Free Statistics

of Irreproducible Research!

Author's title

Author*The author of this computation has been verified*
R Software ModuleRscript (source code is shown below)
Title produced by softwareR console
Date of computationThu, 28 Aug 2008 07:40:15 -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/2008/Aug/28/t1219930816skhnxeitue25lne.htm/, Retrieved Tue, 14 May 2024 12:36:07 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=14269, Retrieved Tue, 14 May 2024 12:36:07 +0000
QR Codes:

Original text written by user:no comments
IsPrivate?No (this computation is public)
User-defined keywordskey1,key2
Estimated Impact281
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-       [R console] [my R test (short ...] [2008-08-28 13:40:15] [d41d8cd98f00b204e9800998ecf8427e] [Current]
Feedback Forum

Post a new message
Dataseries X:
-0.237031992231172
0.815781866587563
0.507291013456018
-1.27921873238508
0.452288068362416
-1.83788241708069
-0.0531282512294644
0.184346229367716
-1.10890529034908
-1.14009271606846
Dataseries Y:
0.71975236479193
0.466550472192466
0.990213686134666
0.0727652127388865
0.230142590822652
0.000502824084833264
0.233904294203967
0.515296748373657
0.579016150673851
0.218579462962225
Dataseries Z:
1.48398633505379
-0.244982044300345
-0.233482784615833
0.600289729367546
-0.114982358002742
0.473168619487531
-1.85737866239823
-1.78348931953539
0.756124119638226
0.691148989728393
> first_number = 5

> second_number = 7

> strpar = 'hello'

> {
+     myfun <- function(x, y) {
+             x + y
+         }
+ 
+     print(myfun(first_number, second_number))
+     print(strpar)
+     print .... [TRUNCATED] 
[1] 12
[1] 'hello'
[1] 0.557114
[1] -0.4859533
Parameters (Session):
par1 = 5 ; par2 = 7 ; par3 = hello ;
Parameters (R input):
R code (body of R function):
{
myfun <- function(x, y) {
x + y
}
print(myfun(par1, par2))
print(par3)
print(cor(x, y))
print(cor(x, z))
}