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 computationFri, 29 Aug 2008 04:25:36 -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/29/t1220005537a1jbc7anitvd2bg.htm/, Retrieved Wed, 15 May 2024 12:24:34 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=14278, Retrieved Wed, 15 May 2024 12:24:34 +0000
QR Codes:

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

Post a new message
Dataseries X:
0.410471129660158
-0.577025790729098
-0.990661382713306
-0.809725967268682
-1.74092158748549
0.646425939162753
0.113660386435801
-2.11664962686172
-0.62626371329072
-0.0201277149196421
Dataseries Y:
NA
NA
NA
Dataseries Z:
NA
NA
NA
> 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]        [,2]
[1,]  0.4104711  0.64642594
[2,] -0.5770258  0.11366039
[3,] -0.9906614 -2.11664963
[4,] -0.8097260 -0.62626371
[5,] -1.7409216 -0.02012771
[1] -0.5332771
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(x)
print(cor(y, z))
}