Free Statistics

of Irreproducible Research!

Author's title

Author*Unverified author*
R Software Modulerwasp_Distributional Plots.wasp
Title produced by softwareHistogram, QQplot and Density
Date of computationMon, 21 Oct 2013 09:34:22 -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/2013/Oct/21/t1382362551tg1cagp5wgpk89c.htm/, Retrieved Sun, 28 Apr 2024 22:02:53 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=217449, Retrieved Sun, 28 Apr 2024 22:02:53 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact75
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-     [Histogram, QQplot and Density] [Workshop 1 ] [2010-09-29 15:04:17] [98fd0e87c3eb04e0cc2efde01dbafab6]
- RMP   [Histogram, QQplot and Density] [EG Histogram of W...] [2013-10-11 11:49:44] [74be16979710d4c4e7c6647856088456]
-    D    [Histogram, QQplot and Density] [Reading- WJZARD d...] [2013-10-21 12:45:29] [c4f8b18ebbbdded2e124a07d0466c488]
-    D        [Histogram, QQplot and Density] [Skills-WJ7AWL dis...] [2013-10-21 13:34:22] [d41d8cd98f00b204e9800998ecf8427e] [Current]
Feedback Forum

Post a new message
Dataseries X:
109
88
87
78
72
85
73
77
90
78
96
84
87
105
89
78
96
79
90
96
95
79
86
99
111
105
123
102
82
86
117
94
110
86
109
118
64
78
86
98
64
84
87
88
106
78
79
95
98
101
104
91
78
123
109
77
77
102
88
81
83
72
95
109
91
87
112
95
103
108
116
71
70
105
112
86
109
112
97
122
97
64
84
110
70
100
102
108
123
78
109
106
95
108
74
86
82
88
96
114
111
88
123
89
114
121
100
83
92
108
87
84
95
90
82
84
96
109
84
83
93
120
83
103
103
102
90
69
114
64
87
116
121
90
92
81
84
106
75
79
80
74
66
81
98
99
68
100
97
99
104
82
92
99
109
106
89
87
98
95
92
90




Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time3 seconds
R Server'Sir Ronald Aylmer Fisher' @ fisher.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 & 3 seconds \tabularnewline
R Server & 'Sir Ronald Aylmer Fisher' @ fisher.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=217449&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]3 seconds[/C][/ROW]
[ROW][C]R Server[/C][C]'Sir Ronald Aylmer Fisher' @ fisher.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=217449&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=217449&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 time3 seconds
R Server'Sir Ronald Aylmer Fisher' @ fisher.wessa.net







Descriptive Statistics
mean93.358024691358formula
standard deviation14.3815000573656formula

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

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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=217449&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
mean93.358024691358formula
standard deviation14.3815000573656formula



Parameters (Session):
par1 = 17 ;
Parameters (R input):
par1 = 17 ;
R code (references can be found in the software module):
bitmap(file='test1.png')
par1 <- as.numeric(par1)
myhist<-hist(x, breaks=par1, col=2, xlab=xlab)
dev.off()
bitmap(file='test2.png')
qqnorm(x)
qqline(x, col=2)
dev.off()
bitmap(file='test3.png')
plot(density(x), xlab=xlab)
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,mean(x))
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,sd(x))
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')