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 computationMon, 12 Oct 2009 10:55:02 -0600
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2009/Oct/12/t1255366647h9eb1jh7pzgn6ns.htm/, Retrieved Sun, 28 Apr 2024 22:22:35 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=45719, Retrieved Sun, 28 Apr 2024 22:22:35 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact169
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-       [Univariate Data Series] [workshop 2] [2009-10-12 16:55:02] [82bf023f1e4d9556a54030fcde33aa09] [Current]
- RMPD    [Central Tendency] [] [2009-10-22 15:25:32] [3af9fa3d2c04a43d660a9a466bdfbaa0]
- RMPD    [Univariate Explorative Data Analysis] [] [2009-10-22 15:32:00] [3af9fa3d2c04a43d660a9a466bdfbaa0]
- RMPD    [Univariate Explorative Data Analysis] [] [2009-10-22 15:37:14] [3af9fa3d2c04a43d660a9a466bdfbaa0]
- RMPD    [Univariate Explorative Data Analysis] [] [2009-10-22 15:42:37] [3af9fa3d2c04a43d660a9a466bdfbaa0]
Feedback Forum

Post a new message
Dataseries X:
26 434
28 595
27 829
28 868
28 600
28 232
27 884
27 300
26 806
26 843
28 340
28 693
26 964
26 628
25 867
26 551
25 743
25 810
25 162
25 263
25 031
24 722
25 629
25 231
24 126
22 672
21 778
21 724
21 520
20 624
19 727
19 128
18 646
18 240
20 121
19 831
18 212
17 584
17 038
17 757
17 616
17 130
16 973
16 649
15 844
16 316
17 850
17 394
16 287
16 328
16 347
17 756
18 674
19 092
19 460
19 163
19 150
19 807
21 306
21 157




Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time1 seconds
R Server'Gwilym Jenkins' @ 72.249.127.135

\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 & 'Gwilym Jenkins' @ 72.249.127.135 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=45719&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]'Gwilym Jenkins' @ 72.249.127.135[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=45719&T=0

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







Univariate Dataseries
Name of dataseriesaantal niet werkende werkzoekenden bij 40 jaar tot -45 jaar
Sourcehttp://www.nbb.be/belgostat/PresentationLinker?TableId=417000065&Lang=N
Descriptiondit zijn aantallen niet werkende werkzoekenden
Number of observations60

\begin{tabular}{lllllllll}
\hline
Univariate Dataseries \tabularnewline
Name of dataseries & aantal niet werkende werkzoekenden bij 40 jaar tot -45 jaar \tabularnewline
Source & http://www.nbb.be/belgostat/PresentationLinker?TableId=417000065&Lang=N \tabularnewline
Description & dit zijn aantallen niet werkende werkzoekenden \tabularnewline
Number of observations & 60 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=45719&T=1

[TABLE]
[ROW][C]Univariate Dataseries[/C][/ROW]
[ROW][C]Name of dataseries[/C][C]aantal niet werkende werkzoekenden bij 40 jaar tot -45 jaar[/C][/ROW]
[ROW][C]Source[/C][C]http://www.nbb.be/belgostat/PresentationLinker?TableId=417000065&Lang=N[/C][/ROW]
[ROW][C]Description[/C][C]dit zijn aantallen niet werkende werkzoekenden[/C][/ROW]
[ROW][C]Number of observations[/C][C]60[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=45719&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=45719&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 dataseriesaantal niet werkende werkzoekenden bij 40 jaar tot -45 jaar
Sourcehttp://www.nbb.be/belgostat/PresentationLinker?TableId=417000065&Lang=N
Descriptiondit zijn aantallen niet werkende werkzoekenden
Number of observations60



Parameters (Session):
par1 = aantal niet werkende werkzoekenden bij 40 jaar tot -45 jaar ; par2 = http://www.nbb.be/belgostat/PresentationLinker?TableId=417000065&Lang=N ; par3 = dit zijn aantallen niet werkende werkzoekenden ;
Parameters (R input):
par1 = aantal niet werkende werkzoekenden bij 40 jaar tot -45 jaar ; par2 = http://www.nbb.be/belgostat/PresentationLinker?TableId=417000065&Lang=N ; par3 = dit zijn aantallen niet werkende werkzoekenden ;
R code (references can be found in the software module):
bitmap(file='test1.png')
plot(x,col=2,type='b',main=main,xlab=xlab,ylab=ylab)
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')