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:50:33 -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/t12199314348naqt8imey9q1kb.htm/, Retrieved Tue, 14 May 2024 11:59:32 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=14273, Retrieved Tue, 14 May 2024 11:59:32 +0000
QR Codes:

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

Post a new message
Dataseries X:
0.544600442349148
-1.30192247030322
-0.256065306471613
-0.790837398133797
-1.35662403304363
0.902421641969355
-1.22891465244125
1.68605410675796
-1.32004576256714
-1.47374856228673
Dataseries Y:
0.164873513160273
0.542998583056033
0.338591950479895
0.926782869035378
0.535939683672041
0.823021578369662
0.77580644050613
0.231830556411296
0.101151176961139
0.90569349587895
Dataseries Z:
-0.364759953529102
0.0580275598501246
1.94124359594211
0.330931160319033
-1.20099945155227
-0.156815158973990
0.917148596743316
-0.236131081113511
-1.10290886097333
1.02144488840777
> 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.3115529
[1] -0.05720744
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))
}