Free Statistics

of Irreproducible Research!

Author's title

Author*The author of this computation has been verified*
R Software Modulerwasp_univariatedataseries.wasp
Title produced by softwareUnivariate Data Series
Date of computationThu, 24 Nov 2011 10:54:48 -0500
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/Nov/24/t1322150111s54c37u4w2cqycs.htm/, Retrieved Thu, 28 Mar 2024 15:30:03 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=147014, Retrieved Thu, 28 Mar 2024 15:30:03 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact74
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-     [Univariate Data Series] [Arabica Price in ...] [2008-01-05 23:14:31] [74be16979710d4c4e7c6647856088456]
- RMPD  [Univariate Data Series] [Data Co2 uitstoot] [2011-11-10 23:08:26] [15a5dd358825f04074b70fc847ec6454]
- R PD    [Univariate Data Series] [Gemiddelde levens...] [2011-11-24 15:49:30] [15a5dd358825f04074b70fc847ec6454]
- R PD      [Univariate Data Series] [GDP in $2005] [2011-11-24 15:52:40] [15a5dd358825f04074b70fc847ec6454]
-   PD          [Univariate Data Series] [Totale populatie ] [2011-11-24 15:54:48] [614dd89c388120cee0dd25886939832b] [Current]
-   PD            [Univariate Data Series] [Gemiddeld jaarlij...] [2011-11-24 15:55:51] [15a5dd358825f04074b70fc847ec6454]
- RMPD            [Multiple Regression] [Multiple regression ] [2011-11-24 17:10:02] [15a5dd358825f04074b70fc847ec6454]
Feedback Forum

Post a new message
Dataseries X:
8450000
8557000
8614000
8639369
8678386
8730405
8777873
8819380
8868475
8923845
8989111
9052707
9103729
9118700
9165800
9218400
9283100
9367000
9448100
9507800
9556500
9589800
9612700
9637800
9672500
9709100
9738400
9767800
9794800
9811000
9821800
9829700
9837200
9846800
9852400
9856303
9855520
9855300
9858200
9861800
9870200
9884000
9937697
9969310
10004487
10045622
10085426
10122914
10155459
10178934
10199787
10217030
10235655
10263618
10291679
10311970
10330824
10348276
10364388
10379067









































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=147014&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=147014&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=147014&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 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.







Univariate Dataseries
Name of dataseriesTotale populatie
Sourcewww.gapminder.org
DescriptionTotale populatie
Number of observations60

\begin{tabular}{lllllllll}
\hline
Univariate Dataseries \tabularnewline
Name of dataseries & Totale populatie  \tabularnewline
Source & www.gapminder.org \tabularnewline
Description & Totale populatie  \tabularnewline
Number of observations & 60 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=147014&T=1

[TABLE]
[ROW][C]Univariate Dataseries[/C][/ROW]
[ROW][C]Name of dataseries[/C][C]Totale populatie [/C][/ROW]
[ROW][C]Source[/C][C]www.gapminder.org[/C][/ROW]
[ROW][C]Description[/C][C]Totale populatie [/C][/ROW]
[ROW][C]Number of observations[/C][C]60[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=147014&T=1

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

As an alternative you can also use a QR Code:  

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

Univariate Dataseries
Name of dataseriesTotale populatie
Sourcewww.gapminder.org
DescriptionTotale populatie
Number of observations60



Parameters (Session):
par1 = Totale populatie ; par2 = www.gapminder.org ; par3 = Totale populatie ; par4 = 12 ;
Parameters (R input):
par1 = Totale populatie ; par2 = www.gapminder.org ; par3 = Totale populatie ; par4 = 12 ;
R code (references can be found in the software module):
if (par4 != 'No season') {
par4 <- as.numeric(par4)
if (par4 < 4) par4 <- 12
}
summary(x)
n <- length(x)
bitmap(file='test1.png')
if (par4=='No season') {
plot(x,col=2,type='b',main=main,xlab=xlab,ylab=ylab,xaxt='n')
axis(1,at=seq(1,n,10))
}
if (par4!='No season') {
plot(x,col=2,type='b',main=main,xlab=xlab,ylab=ylab,xaxt='n')
axis(1,at=seq(1,n,par4))
grid(nx=0,ny=NULL,col='black')
abline(v=seq(1,n,par4),col='black',lty='dotted')
}
dev.off()
load(file='createtable')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,'Univariate Dataseries',2,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Name of dataseries',header=TRUE)
a<-table.element(a,par1)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Source',header=TRUE)
a<-table.element(a,par2)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Description',header=TRUE)
a<-table.element(a,par3)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Number of observations',header=TRUE)
a<-table.element(a,length(x))
a<-table.row.end(a)
a<-table.end(a)
table.save(a,file='mytable.tab')