Send output to:
Browser Blue - Charts White
Browser Black/White
CSV
Data:
1915 4.031.636 1916 3.702.076 1917 3.056.176 1918 3.280.707 1919 2.984.728 1920 3.693.712 1921 3.226.317 1922 2.190.349 1923 2.599.515 1924 3.080.288 1925 2.929.672 1926 2.922.548 1927 3.234.943 1928 2.983.081 1929 3.284.389 1930 3.806.511 1931 3.784.579 1932 2.645.654 1933 3.092.081 1934 3.204.859 1935 3.107.225 1936 3.466.909 1937 2.984.404 1938 3.218.072 1939 282.731 1940 3.182.049 1941 2.236.319 1942 2.033.218 1943 1.644.804 1944 1.627.971 1945 1.677.559 1946 2.330.828 1947 2.493.615 1948 2.257.172 1949 2.655.517 1950 2.298.655 1951 2.600.402 1952 304.523 1953 2.790.583 1954 3.227.052 1955 2.967.479 1956 2.938.817 1957 3.277.961 1958 3.423.985 1959 3.072.646 1960 2.754.253 1961 2.910.431 1962 3.174.369 1963 3.068.387 1964 3.089.543 1965 2.906.654 1966 2.931.161 1967 302.566 1968 2.939.551 1969 2.691.019 1970 319.812 1971 307.639 1972 2.863.873 1973 3.013.802 1974 3.053.364 1975 2.864.753 1976 3.057.062 1977 2.959.365 1978 3.252.258 1979 3.602.988 1980 3.497.704 1981 3.296.867 1982 3.602.417 1983 3.30010 1984 340.193 1985 3.502.591 1986 3.402.348 1987 3.498.551 1988 3.199.823 1989 2.700.064 1990 2.801.034 1991 2.898.628 1992 2.800.854 1993 2.399.942 1994 2.402.724 1995 2.202.331 1996 2.102.594 1997 1.798.293 1998 1.202.484 1999 1.400.201 2000 1.200.832 2001 1.298.083 2002 1.099.742 2003 1.001.377 2004 0.836174
Name of dataseries
Source
Description
Season
12
6
4
No season
Chart options
Title:
Label y-axis:
Label x-axis:
Y-axis minimum
Y-axis maximum
R Code
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')
Compute
Summary of computational transaction
Raw Input
view raw input (R code)
Raw Output
view raw output of R engine
Computing time
0 seconds
R Server
Big Analytics Cloud Computing Center
Click here to blog (archive) this computation