fork download
  1. x <- rexp(100)
  2. y <- 1/x + rnorm(100)
  3. summary(data.frame(y=y,x=x))
Success #stdin #stdout 0.46s 22816KB
stdin
Standard input is empty
stdout
       y                 x          
 Min.   :-2.2062   Min.   :0.02252  
 1st Qu.: 0.4317   1st Qu.:0.24369  
 Median : 1.9448   Median :0.74228  
 Mean   : 3.6035   Mean   :1.09802  
 3rd Qu.: 4.5519   3rd Qu.:1.48192  
 Max.   :44.1370   Max.   :5.54363