R version 3.0.1 (2013-05-16) -- "Good Sport"
Copyright (C) 2013 The R Foundation for Statistical Computing
Platform: i686-pc-linux-gnu (32-bit)

R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.

R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.

Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.

> x <- c(I1M,26,20,19,NA,20,25,NA,22,26,22,NA,NA,19,24,26,NA,13,NA,NA,22,NA,21,7,NA,17,25,25,19,NA,23,NA,22,21,NA,NA,NA,18,NA,NA,22,18,23,20,NA,NA,15,NA,NA,21,NA,18,19,22,16,NA,18,20,24,NA,NA,24,18,21,NA,17,NA,NA,NA,22,16,21,NA,NA,24,24,16,16,NA,NA,NA,NA,18,NA,20,NA,NA,24,17,19,20,15,NA,22,23,16,19,NA,19,NA,NA,21,NA,24,22,NA,18,NA,24,24,22,23,22,20,18,25,NA,16,20,NA,15,19,19,16,17,28,NA,25,20,NA,NA,16,NA,NA,NA,NA,23,21,NA,NA,23,18,20,9,NA,25,20,NA,NA,NA,NA,21,22,27,NA,NA,NA,18,16,22,20,NA,20)
Error: object 'I1M' not found
Execution halted