Free Statistics

of Irreproducible Research!

Author's title

Author*The author of this computation has been verified*
R Software Modulerwasp_Distributional Plots.wasp
Title produced by softwareHistogram, QQplot and Density
Date of computationFri, 01 Jun 2012 06:08:42 -0400
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2012/Jun/01/t1338545334v0bfzq3aoysmved.htm/, Retrieved Thu, 02 May 2024 07:09:21 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=168572, Retrieved Thu, 02 May 2024 07:09:21 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact82
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-     [Simple Linear Regression] [Triglyceridge Reg...] [2011-07-07 15:11:49] [74be16979710d4c4e7c6647856088456]
- R     [Simple Linear Regression] [Triglyceride] [2012-05-04 19:33:41] [98fd0e87c3eb04e0cc2efde01dbafab6]
- RMPD      [Histogram, QQplot and Density] [gs] [2012-06-01 10:08:42] [2c6fbeb8b035aff78a2ee3c8ba680127] [Current]
Feedback Forum

Post a new message
Dataseries X:
49
66
50
52
62
55
59
58
54
60
43
54
53
68
54
62
61
62
55
64
59
61
68
56
70
78
68
54
63
64
63
60
58
64
65
62
50
71
56
53
50
64
76
55
57
57
66
59
57
166
56
64
55
61
60
55
59
62
55
62
53
52
64
50
56
62
52
58
54
60
57
57
56
47
45
53
53
52
47
48
51
54
63
56
58
63
56
53
51
54
75
63
56
59
53
51
59
52
44
55
59
53
50
55
47
39
52
45
47
50
52
50
73
64
67
82
82
81
76
65
85
96
88
92
102
97
88
87
90
82
69
59
84
84
96
88
103
83
77
69
101
78
73
69
69
76
83
67
119
80
65
71
90
79
68
71
75
64
88
85
71
80
66
62
63
78
83
66
81
80
74
70
69
65
79
68
70
89
65
69
79
65
66
74
57
71
55
70
61
75
62
76
76
68
75
69
54
76
66
56




Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time1 seconds
R Server'Gwilym Jenkins' @ jenkins.wessa.net

\begin{tabular}{lllllllll}
\hline
Summary of computational transaction \tabularnewline
Raw Input & view raw input (R code)  \tabularnewline
Raw Output & view raw output of R engine  \tabularnewline
Computing time & 1 seconds \tabularnewline
R Server & 'Gwilym Jenkins' @ jenkins.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=168572&T=0

[TABLE]
[ROW][C]Summary of computational transaction[/C][/ROW]
[ROW][C]Raw Input[/C][C]view raw input (R code) [/C][/ROW]
[ROW][C]Raw Output[/C][C]view raw output of R engine [/C][/ROW]
[ROW][C]Computing time[/C][C]1 seconds[/C][/ROW]
[ROW][C]R Server[/C][C]'Gwilym Jenkins' @ jenkins.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=168572&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=168572&T=0

As an alternative you can also use a QR Code:  

The GUIDs for individual cells are displayed in the table below:

Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time1 seconds
R Server'Gwilym Jenkins' @ jenkins.wessa.net







Descriptive Statistics
mean65.8formula
standard deviation15.095formula

\begin{tabular}{lllllllll}
\hline
Descriptive Statistics \tabularnewline
mean & 65.8 & formula \tabularnewline
standard deviation & 15.095 & formula \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=168572&T=1

[TABLE]
[ROW][C]Descriptive Statistics[/C][/ROW]
[ROW][C]mean[/C][C]65.8[/C][C]formula[/C][/ROW]
[ROW][C]standard deviation[/C][C]15.095[/C][C]formula[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=168572&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=168572&T=1

As an alternative you can also use a QR Code:  

The GUIDs for individual cells are displayed in the table below:

Descriptive Statistics
mean65.8formula
standard deviation15.095formula



Parameters (Session):
par1 = 10 ;
Parameters (R input):
par1 = 10 ;
R code (references can be found in the software module):
par1 <- '10'
x <- x[!is.na(x)]
bitmap(file='test1.png')
par1 <- as.numeric(par1)
myhist<-hist(x, breaks=par1, col=2, xlab=xlab, main=main)
dev.off()
bitmap(file='test2.png')
qqnorm(x)
qqline(x, col=2)
dev.off()
bitmap(file='test3.png')
plot(density(x), xlab=xlab, main=main)
dev.off()
load(file='createtable')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,'Descriptive Statistics',3,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'mean',header=TRUE)
a<-table.element(a,signif(mean(x), 6))
a<-table.element(a,hyperlink('arithmetic_mean.htm','formula','click to see the formula'))
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'standard deviation',header=TRUE)
a<-table.element(a,signif(sd(x), 6))
a<-table.element(a,hyperlink('unbiased1.htm','formula','click to see the formula'))
a<-table.row.end(a)
a<-table.end(a)
table.save(a,file='mytable.tab')