FreeStatistics.org

Free Statistics

of Irreproducible Research!

Description of Statistical Computation

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 05:54:27 -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/t1338544473ohfcvp6c4qj545k.htm/, Retrieved Thu, 02 May 2024 06:41:52 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=168461, Retrieved Thu, 02 May 2024 06:41:52 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact110

Tree of Dependent Computations

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]
- RM    [Histogram, QQplot and Density] [Workshop 1] [2011-10-03 09:04:15] [74be16979710d4c4e7c6647856088456]
- R  D      [Histogram, QQplot and Density] [] [2012-06-01 09:54:27] [169ec5fb8eb5ef8d9bbbf91dacc5bfc6] [Current]
-    D        [Histogram, QQplot and Density] [] [2012-06-01 09:55:37] [9514634163ab2febe0972d8a87e8bbf9]
-    D        [Histogram, QQplot and Density] [] [2012-06-01 09:56:47] [9514634163ab2febe0972d8a87e8bbf9]
-    D        [Histogram, QQplot and Density] [] [2012-06-01 09:57:23] [9514634163ab2febe0972d8a87e8bbf9]
-    D          [Histogram, QQplot and Density] [] [2012-06-01 09:58:41] [9514634163ab2febe0972d8a87e8bbf9]
-    D            [Histogram, QQplot and Density] [] [2012-06-01 09:59:23] [9514634163ab2febe0972d8a87e8bbf9]
- RMPD            [T-Tests] [] [2012-06-01 10:03:24] [9514634163ab2febe0972d8a87e8bbf9]
- RMPD            [T-Tests] [] [2012-06-01 10:04:34] [9514634163ab2febe0972d8a87e8bbf9]
- R  D              [T-Tests] [] [2012-06-01 10:25:04] [9514634163ab2febe0972d8a87e8bbf9]
Feedback Forum

Post a new message

Dataset

Dataseries X:
Download CSV
Histogram
Boxplots 
259
219
214
245
216
246
243
255
249
236
245
223
212
232
215
231
279
230
273
236
299
231
240
239
225
216
232
224
196
284
237
253
252
216
237
240
222
243
266
252
218
258
226
261
264
214
228
237
264
221
243
287
241
256
247
230
233
248
251
251
286
222
229
228
210
258
237
239
220
219
216
210
223
251
252
226
223
222
227
226
241
240
218
220
219
243
217
268
249
277
221
288
219
211
219
241
210
208
237
217
204
224
230
225
267
258
229
246
243
230
267
280
244
243
256
236
246
220
202
239
201
228
272
216
198
260
215
236
278
276
241
215
218
230
235
215
220
216
243
272
225
209
197
211
223
241
224
214
215
215
231
219
218
233
232
287
211
245
231
230
249
236
259
242
256
228
243
218
232
227
259
208
273
262
223
207
226
249
263
271
256

Tables (Output of Computation)





Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time1 seconds
R Server'Herman Ole Andreas Wold' @ wold.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 & 'Herman Ole Andreas Wold' @ wold.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=168461&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]'Herman Ole Andreas Wold' @ wold.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=168461&T=0

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

As an alternative you can also use a QR Code:  
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'Herman Ole Andreas Wold' @ wold.wessa.net






Descriptive Statistics
mean236.459formula
standard deviation21.0999formula

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

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

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

As an alternative you can also use a QR Code:  
QR Code


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

Descriptive Statistics
mean236.459formula
standard deviation21.0999formula


Figures (Output of Computation)

Input Parameters & R Code

Parameters (Session):
par1 = 15 ;
Parameters (R input):
par1 = 15 ;
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, 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')