Some practice with R