FreeStatistics.org

Free Statistics

of Irreproducible Research!

Description of Statistical Computation

Author's title

Author*Unverified author*
R Software ModuleIan.Hollidayrwasp_Distributional Plots.wasp
Title produced by softwareHistogram, QQplot and Density
Date of computationSat, 16 Oct 2010 18:25:01 +0000
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2010/Oct/16/t128725349753th3aac5ms1tko.htm/, Retrieved Sun, 28 Apr 2024 14:57:06 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=83936, Retrieved Sun, 28 Apr 2024 14:57:06 +0000
QR Codes:

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

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]
-    D    [Histogram, QQplot and Density] [] [2010-10-16 18:25:01] [1a378cedcc4b84f9a824122684278c59] [Current]
Feedback Forum

Post a new message

Dataset

Dataseries X:
Download CSV
Histogram
Boxplots 
3
4.333333333
6.333333333
43.66666667
44
47
47
47
48.33333333
49
49.33333333
49.66666667
51
51
51
51
52.66666667
53.33333333
53.66666667
53.66666667
54
54
54.33333333
54.33333333
54.66666667
54.66666667
54.66666667
55
55
55.33333333
55.33333333
55.33333333
55.66666667
55.66666667
56
56
56
56.33333333
56.33333333
56.66666667
56.66666667
56.66666667
56.66666667
57
57.33333333
57.33333333
57.66666667
57.66666667
58
58
58
58
58
58
58
58
58.33333333
58.33333333
58.66666667
58.66666667
58.66666667
58.66666667
58.66666667
58.66666667
58.66666667
59
59
59.33333333
59.33333333
59.33333333
59.33333333
59.33333333
59.66666667
59.66666667
59.66666667
59.66666667
59.66666667
59.66666667
60
60
60
60
60
60
60
60
60
60.33333333
60.33333333
60.33333333
60.33333333
60.33333333
60.33333333
60.66666667
60.66666667
60.66666667
60.66666667
60.66666667
61
61
61
61
61
61
61.33333333
61.33333333
61.33333333
61.33333333
61.33333333
61.33333333
61.33333333
61.66666667
61.66666667
61.66666667
61.66666667
61.66666667
61.66666667
61.66666667
61.66666667
62
62
62
62
62
62
62.33333333
62.33333333
62.33333333
62.33333333
62.66666667
63
63
63
63.33333333
63.33333333
63.33333333
63.33333333
63.33333333
63.66666667
63.66666667
63.66666667
63.66666667
63.66666667
63.66666667
63.66666667
63.66666667
63.66666667
64
64
64
64
64
64
64
64
64.33333333
64.33333333
64.66666667
64.66666667
64.66666667
64.66666667
65
65
65
65.33333333
65.33333333
65.66666667
65.66666667
65.66666667
65.66666667
65.66666667
66
66
66
66
66.33333333
66.33333333
66.66666667
66.66666667
66.66666667
66.66666667
67.33333333
67.66666667
68
68.66666667
69
70
70.33333333
71.33333333

Tables (Output of Computation)





Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time3 seconds
R Server'RServer@AstonUniversity' @ vre.aston.ac.uk

\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 & 'RServer@AstonUniversity' @ vre.aston.ac.uk \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=83936&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]'RServer@AstonUniversity' @ vre.aston.ac.uk[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=83936&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=83936&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 time3 seconds
R Server'RServer@AstonUniversity' @ vre.aston.ac.uk






Descriptive Statistics
mean59.3015873018836formula
standard deviation8.51886675850099formula

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

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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=83936&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
mean59.3015873018836formula
standard deviation8.51886675850099formula


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)
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')