Free Statistics

of Irreproducible Research!

Author's title

Author*Unverified author*
R Software Modulerwasp_univariatedataseries.wasp
Title produced by softwareUnivariate Data Series
Date of computationTue, 28 Sep 2010 13:46:30 +0000
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2010/Sep/28/t1285682103juceir4f52jicvn.htm/, Retrieved Mon, 29 Apr 2024 04:21:44 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=79584, Retrieved Mon, 29 Apr 2024 04:21:44 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact245
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-       [Univariate Data Series] [Maandelijks verko...] [2010-09-28 13:46:30] [2a9374b6a827503db60f94b3ae42bf2a] [Current]
-         [Univariate Data Series] [Maandelijks verko...] [2010-10-01 07:10:15] [61c26263d46f9d3683295aa010aa2c77]
- RMP       [Histogram] [Maandelijks verko...] [2010-10-06 15:58:44] [d1899c9419fc846190372744c0657f19]
- RMP       [Histogram] [Maandelijks verko...] [2010-10-06 15:58:44] [d1899c9419fc846190372744c0657f19]
- RMP       [Kernel Density Estimation] [Maandelijks verko...] [2010-10-06 16:10:12] [d1899c9419fc846190372744c0657f19]
Feedback Forum

Post a new message
Dataseries X:
2834
4683
4120
3849
8435
12854
15883
10520
12562
5060
4520
2150
2905
4820
3950
4053
8700
13520
15400
11100
11950
4900
4633
2300
2945
3960
3900
3767
8820
11980
14085
11600
9814
4930
4360
2640
3050
5485
4366
4790
10100
14830
17930
13580
12490
6400
4980
4930
5856
5120
5100
5623
12035
19846
17030
15860
14890
8053
6080
5987
5682
4980
5450
6035
13240
18400
17689
16490
14062
9556
7555
4328




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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=79584&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 dataseriesMaandelijkse verkoopcijfers Uniplant
SourceAfgevaardigde Uniplant
DescriptionMaandelijkse verkopen
Number of observations72

\begin{tabular}{lllllllll}
\hline
Univariate Dataseries \tabularnewline
Name of dataseries & Maandelijkse verkoopcijfers Uniplant \tabularnewline
Source & Afgevaardigde Uniplant \tabularnewline
Description & Maandelijkse verkopen \tabularnewline
Number of observations & 72 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=79584&T=1

[TABLE]
[ROW][C]Univariate Dataseries[/C][/ROW]
[ROW][C]Name of dataseries[/C][C]Maandelijkse verkoopcijfers Uniplant[/C][/ROW]
[ROW][C]Source[/C][C]Afgevaardigde Uniplant[/C][/ROW]
[ROW][C]Description[/C][C]Maandelijkse verkopen[/C][/ROW]
[ROW][C]Number of observations[/C][C]72[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=79584&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=79584&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 dataseriesMaandelijkse verkoopcijfers Uniplant
SourceAfgevaardigde Uniplant
DescriptionMaandelijkse verkopen
Number of observations72



Parameters (Session):
par1 = Maandelijkse verkoopcijfers Uniplant ; par2 = Afgevaardigde Uniplant ; par3 = Maandelijkse verkopen ; par4 = 12 ;
Parameters (R input):
par1 = Maandelijkse verkoopcijfers Uniplant ; par2 = Afgevaardigde Uniplant ; par3 = Maandelijkse verkopen ; 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')