Repository of Reproducible Computations

Free Statistics

of Irreproducible Research!

Author's title

Author

*The author of this computation has been verified*

R Software Module

rwasp_Distributional Plots.wasp

Title produced by software

Histogram, QQplot and Density

Date of computation

Sun, 01 Sep 2013 13:12:05 -0400

Cite this page as follows

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2013/Sep/01/t13780555397p3mssqkq4jmygz.htm/, Retrieved Sun, 28 Apr 2024 02:19:00 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=211350, Retrieved Sun, 28 Apr 2024 02:19:00 +0000

QR Codes:

Paste this QR Code to cite your computation.

Original text written by user:

IsPrivate?

No (this computation is public)

User-defined keywords

Estimated Impact

179

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)

-     [Histogram, QQplot and Density] [] [2013-09-01 17:09:16] [b9554fd146071c6664c3b90882021607]
-    D    [Histogram, QQplot and Density] [computation] [2013-09-01 17:12:05] [596e6a605e7d57b5b185940866c8678f] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

77	182	77	180	
58	161	51	159	
53	161	54	158	
68	177	70	175	
59	157	59	155	
76	170	76	165	
76	167	77	165	
69	186	73	180	
71	178	71	175	
65	171	64	170	
70	175	75	174	
166	57	56	163	
51	161	52	158	
64	168	64	165	
52	163	57	160	
65	166	66	165	
92	187	101	185	
62	168	62	165	
76	197	75	200	
61	175	61	171	
119	180	124	178	
61	170	61	170	
65	175	66	173	
66	173	70	170	
54	171	59	168	
50	166	50	165	
63	169	61	168	
58	166	60	160	
39	157	41	153	
101	183	100	180	
71	166	71	165	
75	178	73	175	
79	173	76	173	
52	164	52	161	
68	169	63	170	
64	176	65	175	
56	166	54	165	
69	174	69	171	
88	178	86	175	
65	187	67	188	
54	164	53	160	
80	178	80	178	
63	163	59	159	
78	183	80	180	
85	179	82	175	
54	160	55	158	
73	180	NA	NA	
49	161	NA	NA	
54	174	56	173	
75	162	75	158	
82	182	85	183	
56	165	57	163	
74	169	73	170	
102	185	107	185	
64	177	NA	NA	
65	176	64	172	
66	170	65	NA	
73	183	74	180	
75	172	70	169	
57	173	58	170	
68	165	69	165	
71	177	71	170	
71	180	76	175	
78	173	75	169	
97	189	98	185	
60	162	59	160	
64	165	63	163	
64	164	62	161	
52	158	51	155	
80	178	76	175	
62	175	61	171	
66	173	66	175	
55	165	54	163	
56	163	57	159	
50	166	50	161	
50	171	NA	NA	
50	160	55	150	
63	160	64	158	
69	182	70	180	
69	183	70	183	
61	165	60	163	
55	168	56	170	
53	169	52	175	
60	167	55	163	
56	170	56	170	
59	182	61	183	
62	178	66	175	
53	165	53	165	
57	163	59	160	
57	162	56	160	
70	173	68	170	
56	161	56	161	
84	184	86	183	
69	180	71	180	
88	189	87	185	
56	165	57	160	
103	185	101	182	
50	169	50	165	
52	159	52	153	
55	155	NA	154	
55	164	55	163	
63	178	63	175	
47	163	47	160	
45	163	45	160	
62	175	63	173	
53	164	51	160	
52	152	51	150	
57	167	55	164	
64	166	64	165	
59	166	55	163	
84	183	90	183	
79	179	79	171	
55	174	57	171	
67	179	67	179	
76	167	77	165	
62	168	62	163	
83	184	83	181	
96	184	94	183	
75	169	76	165	
65	178	66	178	
78	178	77	175	
69	167	73	165	
68	178	68	175	
55	165	55	163	
67	179	NA	NA	
52	169	56	NA	
47	153	NA	154	
45	157	45	153	
68	171	68	169	
44	157	44	155	
62	166	61	163	
87	185	89	185	
56	160	53	158	
50	148	47	148	
83	177	84	175	
53	162	53	160	
64	172	62	168	
62	167	NA	NA	
90	188	91	185	
85	191	83	188	
66	175	68	175	
52	163	53	160	
53	165	55	163	
54	176	55	176	
64	171	66	171	
55	160	55	155	
55	165	55	165	
59	157	55	158	
70	173	67	170	
88	184	86	183	
57	168	58	165	
47	162	47	160	
47	150	45	152	
55	162	NA	NA	
48	163	44	160	
54	169	58	165	
69	172	68	174	
59	170	NA	NA	
58	169	NA	NA	
57	167	56	165	
51	163	50	160	
54	161	54	160	
53	162	52	158	
59	172	58	171	
56	163	58	161	
59	159	59	155	
63	170	62	168	
66	166	66	165	
96	191	95	188	
53	158	50	155	
76	169	75	165	
54	163	NA	NA	
61	170	61	170	
82	176	NA	NA	
62	168	64	168	
71	178	68	178	
60	174	NA	NA	
66	170	67	165	
81	178	82	175	
68	174	68	173	
80	176	78	175	
43	154	NA	NA	
82	181	NA	NA	
63	165	59	160	
70	173	70	173	
56	162	56	160	
60	172	55	168	
58	169	54	166	
76	183	75	180	
50	158	49	155	
88	185	93	188	
89	173	86	173	
59	164	59	165	
51	156	51	158	
62	164	61	161	
74	175	71	175	
83	180	80	180	
81	175	NA	NA	
90	181	91	178	
79	177	81	178

Summary of computational transaction
Raw Input	view raw input (R code)
Raw Output	view raw output of R engine
Computing time	0 seconds
R Server	'Gertrude Mary Cox' @ cox.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 & 0 seconds \tabularnewline
R Server & 'Gertrude Mary Cox' @ cox.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=211350&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]0 seconds[/C][/ROW]
[ROW][C]R Server[/C][C]'Gertrude Mary Cox' @ cox.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=211350&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=211350&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 Input	view raw input (R code)
Raw Output	view raw output of R engine
Computing time	0 seconds
R Server	'Gertrude Mary Cox' @ cox.wessa.net

Parameters (Session):

par1 = 10 ;

Parameters (R input):

par1 = 10 ;

R code (references can be found in the software module):

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

Free Statistics

Description of Statistical Computation

Tree of Dependent Computations

Dataset

Tables (Output of Computation)

Figures (Output of Computation)

Input Parameters & R Code