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 computationTue, 25 May 2010 12:53:47 +0000
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2010/May/25/t1274792028qzkzutois62ofld.htm/, Retrieved Wed, 01 May 2024 23:31:49 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=76380, Retrieved Wed, 01 May 2024 23:31:49 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywordsICEL 2010, peer review, regression tree, evaluation, social constructivism, reproducible computing, educational technology, e-learning
Estimated Impact251
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-       [R console] [Reviewing Peer Re...] [2010-05-25 12:53:47] [d76b387543b13b5e3afd8ff9e5fdc89f] [Current]
Feedback Forum

Post a new message
> {
+     con <- url('https://automated.biganalytics.eu/download/ICEL2010')
+     load(con)
+     close(con)
+     y <- y[!is.na(y$X1), ]
+     print(r <- table(y$ .... [TRUNCATED] 
, ,  = 0

   
     0  1
  0 58 51
  1 49 66
  2 52 79

, ,  = 1

   
     0  1
  0 53 78
  1 51 85
  2 69 85


Parameters (Session):
Parameters (R input):
R code (body of R function):
{
con <- url("https://automated.biganalytics.eu/download/ICEL2010")
load(con)
close(con)
y <- y[!is.na(y$X1), ]
print(r <- table(y$Year, y$Gender, y$Pop))
}