fork download
  1. # your code goes here
  2. sample(c("正面", "反面"), 10, replace=T)
  3. sample(1:6, 10, replace=T)
  4. qnorm(0.025)
  5. op <- par(mfrow=c(2,2))limite.central(rbinom, distpar=c(10 ,0.1), m=1, s=0.9)par(op)
Success #stdin #stdout #stderr 0.23s 40860KB
stdin
Standard input is empty
stdout
 [1] "反面" "正面" "正面" "反面" "正面" "正面" "正面" "正面" "正面" "正面"
 [1] 1 4 4 1 1 5 4 3 5 2
[1] -1.959964
stderr
Error: unexpected symbol in "op <- par(mfrow=c(2,2))limite.central"
Execution halted