Create size.R