%%
%/%
%in%
hist()
lm()
plot()
read.table()
cut()
if/else
for(){}
while(){}
apply()
lapply()
sapply()
tapply()
split()
aggregate()
apply