Home » date » 2009 » Nov » 08 »

et en et'

*The author of this computation has been verified*

R Software Module: /rwasp_edabi.wasp (opens new window with default values)

Title produced by software: Bivariate Explorative Data Analysis

Date of computation: Sun, 08 Nov 2009 11:45:23 -0700

Cite this page as follows:

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL http://www.freestatistics.org/blog/date/2009/Nov/08/t1257705993osioobpz0h7k31k.htm/, Retrieved Sun, 08 Nov 2009 19:46:33 +0100

BibTeX entries for LaTeX users:

@Manual{KEY,
    author = {{YOUR NAME}},
    publisher = {Office for Research Development and Education},
    title = {Statistical Computations at FreeStatistics.org, URL http://www.freestatistics.org/blog/date/2009/Nov/08/t1257705993osioobpz0h7k31k.htm/},
    year = {2009},
}
@Manual{R,
    title = {R: A Language and Environment for Statistical Computing},
    author = {{R Development Core Team}},
    organization = {R Foundation for Statistical Computing},
    address = {Vienna, Austria},
    year = {2009},
    note = {{ISBN} 3-900051-07-0},
    url = {http://www.R-project.org},
}

Original text written by user:

IsPrivate?

No (this computation is public)

User-defined keywords:

Dataseries X:

» Textbox « » Textfile « » CSV «

33936835159 30314493046 26928810724 24876958291 23615171179 22560896390 21180674746 18880811018 14104945112 12591947967 27408127666 31865891180 33855809685 30821121296 27356441900 25559430961 20624589764 19660646306 17878224124 16326586383 12270950952 11427468353 24482242401 28027924708 29365921307 24738215676 21109429203 18450524729 18809636139 17609493235 15877259911 14678476849 10387674497 9755892421 20668382050 23109994437 22779467617 19863675691 16878186542 16683161474 16408662403 15576419405 13988019702 13126061933 9718459219 9305531861 18930905637 20857117696 21098999752 18220267194 16655566553 17130662024 17205295964 17250491780 17163543527 15989627058 12019125690 11733626565 22335292668 25424042789 26322612177

Dataseries Y:

» Textbox « » Textfile « » CSV «

36760884099 33232292086 29297986578 26997278155 25477946926 24270796612 22755599522 20235549418 15135391672 13679658087 30079192964 34965543884 36937930533 33139684976 29251424550 27291692457 22082709908 20891299946 18885315466 17166343835 12911215481 12183497553 26534302488 30630438612 31529767943 26365143561 22315074193 19491615417 19738046123 18409727299 16641253150 15318942204 10841623409 10400770303 22442799550 25307901177 24447068266 21034011451 17780209972 17453666258 17156154243 16206768970 14597007234 13623569502 10148369161 9843016135 20346044445 22626257308 22266244099 18894043476 17014633513 17309070836 17189436380 17096826164 16799024827 15594484659 11721219340 11534935385 22388838968 25678462085 25989659652

Output produced by software:

Summary of computational transaction
Raw Input	view raw input (R code)
Raw Output	view raw output of R engine
Computing time	4 seconds
R Server	'Sir Ronald Aylmer Fisher' @ 193.190.124.24

Model: Y[t] = c + b X[t] + e[t]
c	-1065080121.41184
b	1.11165328411186

Descriptive Statistics about e[t]
# observations	61
minimum	-2206878499.55294
Q1	-94373808.338344
median	82598594.1450069
mean	-1.16033632247174e-08
Q3	383617441.917658
maximum	746857897.530678

Charts produced by software:

http://www.freestatistics.org/blog/date/2009/Nov/08/t1257705993osioobpz0h7k31k/100ct1257705917.png (open in new window)

http://www.freestatistics.org/blog/date/2009/Nov/08/t1257705993osioobpz0h7k31k/100ct1257705917.ps (open in new window)

http://www.freestatistics.org/blog/date/2009/Nov/08/t1257705993osioobpz0h7k31k/2xz3k1257705917.png (open in new window)

http://www.freestatistics.org/blog/date/2009/Nov/08/t1257705993osioobpz0h7k31k/2xz3k1257705917.ps (open in new window)

http://www.freestatistics.org/blog/date/2009/Nov/08/t1257705993osioobpz0h7k31k/3exhs1257705917.png (open in new window)

http://www.freestatistics.org/blog/date/2009/Nov/08/t1257705993osioobpz0h7k31k/3exhs1257705917.ps (open in new window)

http://www.freestatistics.org/blog/date/2009/Nov/08/t1257705993osioobpz0h7k31k/4hckw1257705917.png (open in new window)

http://www.freestatistics.org/blog/date/2009/Nov/08/t1257705993osioobpz0h7k31k/4hckw1257705917.ps (open in new window)

http://www.freestatistics.org/blog/date/2009/Nov/08/t1257705993osioobpz0h7k31k/5br3c1257705917.png (open in new window)

http://www.freestatistics.org/blog/date/2009/Nov/08/t1257705993osioobpz0h7k31k/5br3c1257705917.ps (open in new window)

http://www.freestatistics.org/blog/date/2009/Nov/08/t1257705993osioobpz0h7k31k/6yrl61257705917.png (open in new window)

http://www.freestatistics.org/blog/date/2009/Nov/08/t1257705993osioobpz0h7k31k/6yrl61257705917.ps (open in new window)

http://www.freestatistics.org/blog/date/2009/Nov/08/t1257705993osioobpz0h7k31k/7t7dr1257705917.png (open in new window)

http://www.freestatistics.org/blog/date/2009/Nov/08/t1257705993osioobpz0h7k31k/7t7dr1257705917.ps (open in new window)

http://www.freestatistics.org/blog/date/2009/Nov/08/t1257705993osioobpz0h7k31k/8zmry1257705917.png (open in new window)

http://www.freestatistics.org/blog/date/2009/Nov/08/t1257705993osioobpz0h7k31k/8zmry1257705917.ps (open in new window)

Parameters (Session):

par1 = 0 ; par2 = 36 ;

Parameters (R input):

par1 = 0 ; par2 = 36 ;

R code (references can be found in the software module):

par1 <- as.numeric(par1)

par2 <- as.numeric(par2)

x <- as.ts(x)

y <- as.ts(y)

mylm <- lm(y~x)

cbind(mylm$resid)

library(lattice)

bitmap(file='pic1.png')

plot(y,type='l',main='Run Sequence Plot of Y[t]',xlab='time or index',ylab='value')

grid()

dev.off()

bitmap(file='pic1a.png')

plot(x,type='l',main='Run Sequence Plot of X[t]',xlab='time or index',ylab='value')

grid()

dev.off()

bitmap(file='pic1b.png')

plot(x,y,main='Scatter Plot',xlab='X[t]',ylab='Y[t]')

grid()

dev.off()

bitmap(file='pic1c.png')

plot(mylm$resid,type='l',main='Run Sequence Plot of e[t]',xlab='time or index',ylab='value')

grid()

dev.off()

bitmap(file='pic2.png')

hist(mylm$resid,main='Histogram of e[t]')

dev.off()

bitmap(file='pic3.png')

if (par1 > 0)

{

densityplot(~mylm$resid,col='black',main=paste('Density Plot of e[t]   bw = ',par1),bw=par1)

} else {

densityplot(~mylm$resid,col='black',main='Density Plot of e[t]')

}

dev.off()

bitmap(file='pic4.png')

qqnorm(mylm$resid,main='QQ plot of e[t]')

qqline(mylm$resid)

grid()

dev.off()

if (par2 > 0)

{

bitmap(file='pic5.png')

acf(mylm$resid,lag.max=par2,main='Residual Autocorrelation Function')

grid()

dev.off()

}

summary(x)

load(file='createtable')

a<-table.start()

a<-table.row.start(a)

a<-table.element(a,'Model: Y[t] = c + b X[t] + e[t]',2,TRUE)

a<-table.row.end(a)

a<-table.row.start(a)

a<-table.element(a,'c',1,TRUE)

a<-table.element(a,mylm$coeff[[1]])

a<-table.row.end(a)

a<-table.row.start(a)

a<-table.element(a,'b',1,TRUE)

a<-table.element(a,mylm$coeff[[2]])

a<-table.row.end(a)

a<-table.end(a)

table.save(a,file='mytable.tab')

a<-table.start()

a<-table.row.start(a)

a<-table.element(a,'Descriptive Statistics about e[t]',2,TRUE)

a<-table.row.end(a)

a<-table.row.start(a)

a<-table.element(a,'# observations',header=TRUE)

a<-table.element(a,length(mylm$resid))

a<-table.row.end(a)

a<-table.row.start(a)

a<-table.element(a,'minimum',header=TRUE)

a<-table.element(a,min(mylm$resid))

a<-table.row.end(a)

a<-table.row.start(a)

a<-table.element(a,'Q1',header=TRUE)

a<-table.element(a,quantile(mylm$resid,0.25))

a<-table.row.end(a)

a<-table.row.start(a)

a<-table.element(a,'median',header=TRUE)

a<-table.element(a,median(mylm$resid))

a<-table.row.end(a)

a<-table.row.start(a)

a<-table.element(a,'mean',header=TRUE)

a<-table.element(a,mean(mylm$resid))

a<-table.row.end(a)

a<-table.row.start(a)

a<-table.element(a,'Q3',header=TRUE)

a<-table.element(a,quantile(mylm$resid,0.75))

a<-table.row.end(a)

a<-table.row.start(a)

a<-table.element(a,'maximum',header=TRUE)

a<-table.element(a,max(mylm$resid))

a<-table.row.end(a)

a<-table.end(a)

table.save(a,file='mytable.tab')

This work is licensed under a Creative Commons Attribution-Noncommercial-Share Alike 3.0 License.

Software written by Ed van Stee & Patrick Wessa

Disclaimer

Information provided on this web site is provided "AS IS" without warranty of any kind, either express or implied, including, without limitation, warranties of merchantability, fitness for a particular purpose, and noninfringement. We use reasonable efforts to include accurate and timely information and periodically update the information, and software without notice. However, we make no warranties or representations as to the accuracy or completeness of such information (or software), and we assume no liability or responsibility for errors or omissions in the content of this web site, or any software bugs in online applications. Your use of this web site is AT YOUR OWN RISK. Under no circumstances and under no legal theory shall we be liable to you or any other person for any direct, indirect, special, incidental, exemplary, or consequential damages arising from your access to, or use of, this web site.

We may request personal information to be submitted to our servers in order to be able to:

personalize online software applications according to your needs
enforce strict security rules with respect to the data that you upload (e.g. statistical data)
manage user sessions of online applications
alert you about important changes or upgrades in resources or applications

We NEVER allow other companies to directly offer registered users information about their products and services. Banner references and hyperlinks of third parties NEVER contain any personal data of the visitor.

We do NOT sell, nor transmit by any means, personal information, nor statistical data series uploaded by you to third parties.

We carefully protect your data from loss, misuse, alteration, and destruction. However, at any time, and under any circumstance you are solely responsible for managing your passwords, and keeping them secret.

We store a unique ANONYMOUS USER ID in the form of a small 'Cookie' on your computer. This allows us to track your progress when using this website which is necessary to create state-dependent features. The cookie is used for NO OTHER PURPOSE. At any time you may opt to disallow cookies from this website - this will not affect other features of this website.

We examine cookies that are used by third-parties (banner and online ads) very closely: abuse from third-parties automatically results in termination of the advertising contract without refund. We have very good reason to believe that the cookies that are produced by third parties (banner ads) do NOT cause any privacy or security risk.

FreeStatistics.org is safe. There is no need to download any software to use the applications and services contained in this website. Hence, your system's security is not compromised by their use, and your personal data - other than data you submit in the account application form, and the user-agent information that is transmitted by your browser - is never transmitted to our servers.

As a general rule, we do not log on-line behavior of individuals (other than normal logging of webserver 'hits'). However, in cases of abuse, hacking, unauthorized access, Denial of Service attacks, illegal copying, hotlinking, non-compliance with international webstandards (such as robots.txt), or any other harmful behavior, our system engineers are empowered to log, track, identify, publish, and ban misbehaving individuals - even if this leads to ban entire blocks of IP addresses, or disclosing user's identity.

FreeStatistics.org is powered by