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_edauni.wasp

Title produced by software

Univariate Explorative Data Analysis

Date of computation

Wed, 12 Dec 2012 09:22:11 -0500

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/2012/Dec/12/t1355322145u51r1y39g91at4y.htm/, Retrieved Sun, 28 Apr 2024 20:33:08 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=198901, Retrieved Sun, 28 Apr 2024 20:33:08 +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

100

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

-       [Univariate Explorative Data Analysis] [cdqqplot] [2012-12-12 14:22:11] [e357aba3893873b930815b56a53f1005] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

-6.141574074074070
2.766759259259260
-2.474768518518540
-24.749212962963000
-27.341990740740700
-24.099629629629600
-33.038657407407400
-8.168935185185200
-7.480462962962920
7.314953703703800
37.235092592592600
-3.204907407407350
51.437592592592600
27.533425925925900
4.379398148148080
30.009120370370400
-13.662824074074000
-0.0871296296296009
28.698842592592600
45.426898148148200
31.498703703703800
19.148287037037100
12.155925925925900
-21.496574074074000
-5.812407407407420
-26.724907407407400
-3.037268518518490
-15.228379629629600
6.978842592592570
23.204537037037100
-14.909490740740800
-25.098101851851800
-17.213796296296200
-11.485046296296200
-4.577407407407350
-37.146574074074100
-13.445740740740700
-5.920740740740710
22.550231481481500
26.934120370370400
29.599675925925900
9.358703703703700
-17.288657407407400
-17.243935185185200
-27.347129629629600
-1.689212962962960
16.630925925926000
-28.521574074074100
3.866759259259250
20.929259259259300
22.529398148148100
14.575787037037000
5.991342592592590
2.158703703703710
-9.538657407407440
-30.718935185185200
-18.667962962962900
15.460787037037100
11.443425925925900
-46.979907407407400
-33.029074074074100
-35.524907407407400
-24.133101851851800
-30.890879629629600
-25.216990740740800
-8.687129629629570
21.478009259259300
39.681064814814800
52.869537037037000
61.014953703703700
52.914259259259300
-24.896574074074100
-2.716574074074060
9.329259259259230
28.746064814814800
0.100787037037037
4.274675925925920
-0.216296296296264
0.0946759259259125
-9.410601851851880
-4.651296296296270
29.556620370370400
8.385092592592570
-40.050740740740800
-33.420740740740800
-9.849907407407440
-8.512268518518510
4.634120370370400
9.953842592592600
13.600370370370400
-15.642824074074000
-21.731435185185100
2.632037037037090
5.664953703703760
36.035092592592500
0.678425925925978
5.866759259259250
-14.716574074074100
-14.641435185185200
-15.536712962963000
14.983009259259200
20.758703703703700
2.936342592592670
-16.456435185185100
-20.455462962963000
-2.014212962962920
15.955925925925900
-12.292407407407400
-23.616574074074000
-37.349907407407400
-39.524768518518400
-47.378379629629500
-21.796157407407500
-20.374629629629700
1.503009259259220
41.001898148148300
53.257037037037100
72.781620370370400
62.414259259259400
22.857592592592700
31.916759259259300
15.337592592592600
-15.941435185185200
-21.074212962962900
-26.337824074074000
13.037870370370400
13.061342592592700
18.897731481481500
11.248703703703700
-16.535046296296200
-15.923240740740700
-40.571574074074000
-27.945740740740700
-16.362407407407400
-9.312268518518580
10.463287037037000
29.228842592592600
14.667037037037100
-1.538657407407360
-35.152268518518500
14.136203703703700
-2.880879629629530
-7.306574074074090
-6.288240740740660
-18.591574074074100
-16.654074074074100
-50.558101851851900
-23.115879629629700
-12.137824074074000
26.821203703703700
30.869675925925900
47.610231481481500
41.982037037037000
24.485787037037000
22.564259259259400
15.811759259259200
10.891759259259300
-1.674907407407370
-14.495601851851900
-6.924212962962880
-13.171157407407300
3.175370370370440
-2.759490740740660
-17.185601851851900
-4.576296296296330
-5.085046296296240
28.260092592592500
-15.821574074074000
-28.158240740740700
3.166759259259270
-19.341435185185100
-26.657546296296300
0.703842592592707
1.512870370370360
12.311342592592700
28.043564814814800
9.048703703703780
3.877453703703740
19.189259259259300
6.174259259259320
-9.370740740740640
-14.041574074074100
-21.624768518518500
-11.824212962963000
15.695509259259300
9.662870370370290
11.811342592592600
1.264398148148130
2.886203703703760
5.627453703703800
-0.677407407407429
22.803425925925900
-25.495740740740700
-2.616574074074040
-9.812268518518580
3.213287037037050
-3.375324074074060
7.475370370370340
-9.859490740740630
8.239398148148210
-12.197129629629600
11.348287037037100
8.305925925925920
24.136759259259300
-7.654074074074060
4.950092592592570
-1.658101851851940
6.992453703703750
8.512175925925990
0.99620370370377
-23.096990740740800
-41.218935185185200
-26.767962962962900
-9.880879629629650
19.651759259259200
28.503425925926000
0.687592592592637
9.500092592592580
-4.153935185185160
8.292453703703760
0.0538425925926731
8.692037037037040
-16.096990740740700
-22.564768518518500
-24.197129629629700
-16.401712962962900
-19.452407407407400
23.120092592592600
10.862592592592600
11.758425925925900
25.041898148148100
47.388287037037000
22.541342592592600
3.729537037037060
-33.892824074074100
-19.385601851851800
-29.772129629629600
-30.072546296296300
-24.639907407407400
36.232592592592700
24.037592592592600
13.554259259259300
17.637731481481500
24.304953703703700
9.399675925925980
-6.653796296296260
-33.080324074074100
-36.177268518518500
-32.142962962963000
-15.022546296296300
-20.227407407407400
14.495092592592600
16.129259259259200
10.758425925926000
30.129398148148100
25.834120370370400
-17.200324074074000
-36.553796296296300
-42.726157407407400
-22.718935185185100
-16.497129629629600
-5.610046296296220
-15.298240740740800
24.078425925925900
16.958425925925900
4.395925925925840
17.029398148148100
18.784120370370400
23.308009259259300
17.371203703703800
15.123842592592600
3.368564814814870
-5.613796296296300
-16.835046296296300
-28.069074074074100
7.570092592592570
16.704259259259200
21.462592592592600
17.629398148148100
6.271620370370390
9.658009259259300
-3.074629629629610
-0.163657407407300
-9.793935185185030
-4.380462962962890
-14.547546296296300
-26.214907407407400
13.836759259259400
19.683425925925900
25.333425925926000
29.033564814814800
31.163287037037000
-6.096157407407420
-17.620462962963000
-29.921990740740700
-15.256435185185200
-20.292962962962900
-8.635046296296310
-21.385740740740700
11.682592592592700
6.354259259259320
1.208425925925890
12.975231481481500
-12.945046296296300
-6.921157407407350
-11.587129629629700
5.023842592592640
4.810231481481480
-17.326296296296300
-31.926712962962900
-38.823240740740700
-3.392407407407350
-11.624907407407400
-43.874907407407400
-22.087268518518400
-51.745046296296200
-38.112824074074100
-25.003796296296300
83.611342592592700
64.876898148148300
72.002870370370500
39.727453703703800
25.347592592592700
36.120092592592600
21.125092592592600
2.670925925926210
8.204398148148360
3.575787037037120
-9.662824074074020
-5.166296296296200
25.965509259259300
8.422731481481500
-15.247129629629600
-34.510046296296400
-69.902407407407600
-6.363240740740710
13.433425925926100
20.645925925926100
8.908564814815000
6.642453703703720
13.512175925926000
6.483703703703780
19.365509259259400
42.835231481481600
15.848703703703800
-37.489212962963100
-52.589907407407400
12.640925925925900
-4.320740740740920
18.620925925925900
15.125231481481600
17.500787037037200
15.249675925926000
-24.970462962963000
10.311342592592600
-7.585601851851950
-3.972129629629650
-36.776712962963100
-32.789907407407400
-15.104907407407400

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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=198901&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	4 seconds
R Server	'Sir Maurice George Kendall' @ kendall.wessa.net

Descriptive Statistics
# observations	360
minimum	-69.9024074074076
Q1	-16.4666087962962
median	0.0742592592592928
mean	-0.0462962962962753
Q3	15.1241898148148
maximum	83.6113425925927

\begin{tabular}{lllllllll}
\hline
Descriptive Statistics \tabularnewline
# observations & 360 \tabularnewline
minimum & -69.9024074074076 \tabularnewline
Q1 & -16.4666087962962 \tabularnewline
median & 0.0742592592592928 \tabularnewline
mean & -0.0462962962962753 \tabularnewline
Q3 & 15.1241898148148 \tabularnewline
maximum & 83.6113425925927 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=198901&T=1

[TABLE]
[ROW][C]Descriptive Statistics[/C][/ROW]
[ROW][C]# observations[/C][C]360[/C][/ROW]
[ROW][C]minimum[/C][C]-69.9024074074076[/C][/ROW]
[ROW][C]Q1[/C][C]-16.4666087962962[/C][/ROW]
[ROW][C]median[/C][C]0.0742592592592928[/C][/ROW]
[ROW][C]mean[/C][C]-0.0462962962962753[/C][/ROW]
[ROW][C]Q3[/C][C]15.1241898148148[/C][/ROW]
[ROW][C]maximum[/C][C]83.6113425925927[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=198901&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=198901&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
# observations	360
minimum	-69.9024074074076
Q1	-16.4666087962962
median	0.0742592592592928
mean	-0.0462962962962753
Q3	15.1241898148148
maximum	83.6113425925927

Figure 1

PNG link

Postscript link

PDF link

Figure 2

PNG link

Postscript link

PDF link

Figure 3

PNG link

Postscript link

PDF link

Figure 4

PNG link

Postscript link

PDF link

Figure 5

PNG link

Postscript link

PDF link

Figure 6

PNG link

Postscript link

PDF link

Figure 7

PNG link

Postscript link

PDF link

Parameters (Session):

par1 = 0 ; par2 = 0 ;

Parameters (R input):

par1 = 0 ; par2 = 0 ;

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

par2 <- '0'
par1 <- '0'
par1 <- as.numeric(par1)
par2 <- as.numeric(par2)
x <- as.ts(x)
library(lattice)
bitmap(file='pic1.png')
plot(x,type='l',main='Run Sequence Plot',xlab='time or index',ylab='value')
grid()
dev.off()
bitmap(file='pic2.png')
hist(x)
grid()
dev.off()
bitmap(file='pic3.png')
if (par1 > 0)
{
densityplot(~x,col='black',main=paste('Density Plot   bw = ',par1),bw=par1)
} else {
densityplot(~x,col='black',main='Density Plot')
}
dev.off()
bitmap(file='pic4.png')
qqnorm(x)
qqline(x)
grid()
dev.off()
if (par2 > 0)
{
bitmap(file='lagplot1.png')
dum <- cbind(lag(x,k=1),x)
dum
dum1 <- dum[2:length(x),]
dum1
z <- as.data.frame(dum1)
z
plot(z,main='Lag plot (k=1), lowess, and regression line')
lines(lowess(z))
abline(lm(z))
dev.off()
if (par2 > 1) {
bitmap(file='lagplotpar2.png')
dum <- cbind(lag(x,k=par2),x)
dum
dum1 <- dum[(par2+1):length(x),]
dum1
z <- as.data.frame(dum1)
z
mylagtitle <- 'Lag plot (k='
mylagtitle <- paste(mylagtitle,par2,sep='')
mylagtitle <- paste(mylagtitle,'), and lowess',sep='')
plot(z,main=mylagtitle)
lines(lowess(z))
dev.off()
}
bitmap(file='pic5.png')
acf(x,lag.max=par2,main='Autocorrelation Function')
grid()
dev.off()
}
summary(x)
load(file='createtable')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,'Descriptive Statistics',2,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'# observations',header=TRUE)
a<-table.element(a,length(x))
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'minimum',header=TRUE)
a<-table.element(a,min(x))
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Q1',header=TRUE)
a<-table.element(a,quantile(x,0.25))
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'median',header=TRUE)
a<-table.element(a,median(x))
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.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Q3',header=TRUE)
a<-table.element(a,quantile(x,0.75))
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'maximum',header=TRUE)
a<-table.element(a,max(x))
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