powered by
brain
body
data(enzyme) data(brains)
data(enzyme) hist(enzyme$act) data(brains) brains$lbrain<-log(brains$brain) brains$lbody<-log(brains$body) with(brains, plot(lbrain~lbody))
Run the code above in your browser using DataLab