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 computationThu, 13 Oct 2011 09:25:51 -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/2011/Oct/13/t1318512376u1okmnp2mk3q2mp.htm/, Retrieved Sun, 12 May 2024 09:13:20 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=128900, Retrieved Sun, 12 May 2024 09:13:20 +0000
QR Codes:

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

Tree of Dependent Computations

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-     [Histogram and QQplot] [PY2224 Aston Work...] [2009-10-06 09:57:09] [98fd0e87c3eb04e0cc2efde01dbafab6]
-   P   [Histogram and QQplot] [olivia friday] [2009-10-09 12:41:21] [3fdd735c61ad38cbc9b3393dc997cdb7]
- RMPD    [Histogram and QQplot] [Reddy Moores Hist...] [2009-10-09 13:23:16] [98fd0e87c3eb04e0cc2efde01dbafab6]
- RM        [Histogram and QQPlot (Reddy-Moores Data)] [Histogram and QQP...] [2011-10-10 10:35:06] [98fd0e87c3eb04e0cc2efde01dbafab6]
- RM          [Histogram, QQplot and Density] [workshop - week 2] [2011-10-12 08:06:48] [72617798859a54657cdee39682e42a20]
- R  D            [Histogram, QQplot and Density] [Placement Students] [2011-10-13 13:25:51] [39c157a312c0b123fedb26736b510cf2] [Current]
Feedback Forum

Post a new message

Dataset

Dataseries X:
Download CSV
Histogram
Boxplots 
80
66
67
65
67
72
80
65
64
60
61
64
61
64
57
67
64
64
66
53
59
55
57


























72
62
71
57
62
63
64
65
69
62
62
52
54
68
48
60
50
58
55
54
60
55





































74
80
74
65
65
62
60
62
67
60
64
65
62
63
62
68
67
62
67
58
68
58
60
60
55
47
58
54
52
55
51
58







































74
74
80
74
68
74
74
65
65
74
74
74
74
65
62
74
58
65
65
65
62
74
65
68
65
62
62
68
68
62
58
62
68
63
58
65
58
62
65
65
65
52
65
62
65
62
45
65
58
62
65
58
58
74
62
65
62
58
55
65
55








































68
80
74
62
74
68
65
65
68
62
62
68
65
58
58
65
65
58
62
52
68
62
68
58
58
52
58
62
65
58
55
65
58
58
58
65
62
65
58
58
55
68
55























65
62
80
68
65
58
68
68
68
62
62
68
65
58
65
80
65
62
65
74
58
62
68
58
65
62
62
62
58
65
52
58
58
52
65
65
58
65
40
62
74
58
58
55







































72
62
71
57
62
63
64
65
69
62
62
52
54
68
48
60
50
58
55
54
60
55





































74
80
74
65
65
62
60
62
67
60
64
65
62
63
62
68
67
62
67
58
68
58
60
60
55
47
58
54
52
55
51
58







































74
74
80
74
68
74
74
65
65
74
74
74
74
65
62
74
58
65
65
65
62
74
65
68
65
62
62
68
68
62
58
62
68
63
58
65
58
62
65
65
65
52
65
62
65
62
45
65
58
62
65
58
58
74
62
65
62
58
55
65
55








































68
80
74
62
74
68
65
65
68
62
62
68
65
58
58
65
65
58
62
52
68
62
68
58
58
52
58
62
65
58
55
65
58
58
58
65
62
65
58
58
55
68
55























65
62
80
68
65
58
68
68
68
62
62
68
65
58
65
80
65
62
65
74
58
62
68
58
65
62
62
62
58
65
52
58
58
52
65
65
58
65
40
62
74
58
58
55























80
66
67
65
67
72
80
65
64
60
61
64
61
64
57
67
64
64
66
53
59
55
57


























72
62
71
57
62
63
64
65
69
62
62
52
54
68
48
60
50
58
55
54
60
55





































74
80
74
65
65
62
60
62
67
60
64
65
62
63
62
68
67
62
67
58
68
58
60
60
55
47
58
54
52
55
51
58







































74
74
80
74
68
74
74
65
65
74
74
74
74
65
62
74
58
65
65
65
62
74
65
68
65
62
62
68
68
62
58
62
68
63
58
65
58
62
65
65
65
52
65
62
65
62
45
65
58
62
65
58
58
74
62
65
62
58
55
65
55








































68
80
74
62
74
68
65
65
68
62
62
68
65
58
58
65
65
58
62
52
68
62
68
58
58
52
58
62
65
58
55
65
58
58
58
65
62
65
58
58
55
68
55























65
62
80
68
65
58
68
68
68
62
62
68
65
58
65
80
65
62
65
74
58
62
68
58
65
62
62
62
58
65
52
58
58
52
65
65
58
65
40
62
74
58
58
55

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
R Framework error message
Warning: there are blank lines in the 'Data' field.
Please, use NA for missing data - blank lines are simply
 deleted and are NOT treated as missing values.

\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
R Framework error message & 
Warning: there are blank lines in the 'Data' field.
Please, use NA for missing data - blank lines are simply
 deleted and are NOT treated as missing values.
 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=128900&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]
[ROW][C]R Framework error message[/C][C]
Warning: there are blank lines in the 'Data' field.
Please, use NA for missing data - blank lines are simply
 deleted and are NOT treated as missing values.
[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=128900&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=128900&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
R Framework error message
Warning: there are blank lines in the 'Data' field.
Please, use NA for missing data - blank lines are simply
 deleted and are NOT treated as missing values.






Descriptive Statistics
mean63.0521formula
standard deviation6.65016formula

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

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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=128900&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
mean63.0521formula
standard deviation6.65016formula


Figures (Output of Computation)

Input Parameters & R Code

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