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, 22 Dec 2008 12:36:47 -0700
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2008/Dec/22/t1229974771hzvaljvvf33b02t.htm/, Retrieved Mon, 13 May 2024 12:06:13 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=36190, Retrieved Mon, 13 May 2024 12:06:13 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact144
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
F     [Univariate Data Series] [Arbeidsmarkt : We...] [2008-10-13 19:58:24] [96bc6f87b4bace5befbd6945cffd69f4]
-   PD    [Univariate Data Series] [] [2008-12-22 19:36:47] [3762bf489501725951ad2579179cae2a] [Current]
Feedback Forum

Post a new message
Dataseries X:
451
450
444
429
421
400
389
384
432
446
431
423
416
416
413
399
386
374
365
365
418
428
424
421
417
423
423
419
406
398
390
391
444
460
455
456
452
459
461
451
443
439
430
436
488
506
502
501
501
515
521
520
512
509
505
511
570
592
594
586
586
592
594
586
572
563
555
554
601
622
617
606
595
599
600
592
575
567
555
555
608
631
629
624
610
616
621
604
584
574
555
545
599
620
608
590
579
580
579
572
560
551
537
541
588
607
599
578
563
566
561
554
540
526
512
505
554
584
569
540
522
526
527
516
503
489
479
475
524
552
532
511
492
492
493
481
462
457
442
439
488
521
501
485
464
460
467
460
448
443
436
431
484
510
513
503
471
471
476
475
470
461
455
456
517
525
523
519
509
512
519
517
510
509
501
507
569
580
578
565
547
555
562
561
555
544
537
543
594
611
613
611
594
595
591
589
584
573
567
569
621
629
628
612
595
597
593
590
580
574
573
573
620
626
620
588
566
557
561
549
532
526
511
499
555
565
542
527
510
514
517
508
493
490
469
478
528
534
518
506
502




Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time2 seconds
R Server'Sir Ronald Aylmer Fisher' @ 193.190.124.24

\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 & 2 seconds \tabularnewline
R Server & 'Sir Ronald Aylmer Fisher' @ 193.190.124.24 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=36190&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]2 seconds[/C][/ROW]
[ROW][C]R Server[/C][C]'Sir Ronald Aylmer Fisher' @ 193.190.124.24[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=36190&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=36190&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 time2 seconds
R Server'Sir Ronald Aylmer Fisher' @ 193.190.124.24







Univariate Dataseries
Name of dataseriesArbeidsmarkt : Werkloosheid (brutogegevens in duizenden)
SourceBelgostat
DescriptionArbeidsmarkt : Werkloosheid (brutogegevens in duizenden) periode 30/11/1988 tot 30/11/2008
Number of observations241

\begin{tabular}{lllllllll}
\hline
Univariate Dataseries \tabularnewline
Name of dataseries & Arbeidsmarkt : Werkloosheid (brutogegevens in duizenden) \tabularnewline
Source & Belgostat \tabularnewline
Description & Arbeidsmarkt : Werkloosheid (brutogegevens in duizenden) periode 30/11/1988 tot 30/11/2008 \tabularnewline
Number of observations & 241 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=36190&T=1

[TABLE]
[ROW][C]Univariate Dataseries[/C][/ROW]
[ROW][C]Name of dataseries[/C][C]Arbeidsmarkt : Werkloosheid (brutogegevens in duizenden)[/C][/ROW]
[ROW][C]Source[/C][C]Belgostat[/C][/ROW]
[ROW][C]Description[/C][C]Arbeidsmarkt : Werkloosheid (brutogegevens in duizenden) periode 30/11/1988 tot 30/11/2008[/C][/ROW]
[ROW][C]Number of observations[/C][C]241[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=36190&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=36190&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 dataseriesArbeidsmarkt : Werkloosheid (brutogegevens in duizenden)
SourceBelgostat
DescriptionArbeidsmarkt : Werkloosheid (brutogegevens in duizenden) periode 30/11/1988 tot 30/11/2008
Number of observations241



Parameters (Session):
par1 = Arbeidsmarkt : Werkloosheid (brutogegevens in duizenden) ; par2 = Belgostat ; par3 = Arbeidsmarkt : Werkloosheid (brutogegevens in duizenden) periode 30/11/1988 tot 30/11/2008 ;
Parameters (R input):
par1 = Arbeidsmarkt : Werkloosheid (brutogegevens in duizenden) ; par2 = Belgostat ; par3 = Arbeidsmarkt : Werkloosheid (brutogegevens in duizenden) periode 30/11/1988 tot 30/11/2008 ;
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')