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:39:26 -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/t1220006367ozv76t4f2xyubtd.htm/, Retrieved Wed, 15 May 2024 23:05:12 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=14281, Retrieved Wed, 15 May 2024 23:05:12 +0000
QR Codes:

Original text written by user:no comments
IsPrivate?No (this computation is public)
User-defined keywordskey1,key2
Estimated Impact241
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:39:26] [d41d8cd98f00b204e9800998ecf8427e] [Current]
Feedback Forum

Post a new message
Dataseries X:
-0.139396564467797
-0.531810678072031
-0.297755894090094
1.4609533330827
-0.242394184147378
-0.186932987841735
-0.0901753370224382
0.0128251277262595
1.67675197715263
0.00507042385000422
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.1393966 -0.186932988
[2,] -0.5318107 -0.090175337
[3,] -0.2977559  0.012825128
[4,]  1.4609533  1.676751977
[5,] -0.2423942  0.005070424
[1] 0.4698485
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))
}