powered by
"getone"(obj, x, safe = TRUE, msg = TRUE)
ll <- list(11,22,33,a=44,b=55,66,77,c=88,99) getone(ll,numeric()) getone(ll,"a") getone(ll,"c") getone(ll,1) getone(ll,7) getone(ll,7,safe=FALSE)
Run the code above in your browser using DataLab