Is a TESTfile frame? In this case, the row header will not be divided by 1000. To select all columns except the first, use the index in jto select all columns except the first? eg.
TEST[, 2:ncol(TEST)]/1000
TEST[, -1]/1000
Or you can select columns by name, etc. (you select columns in the same way as you currently select rows).
, ?'[', , .