parmData <- read.table("ParameterData.txt”)

V1
1    10
2     5
3     8
4   0.3
5   0.5
6   VAL

var1 <- as.numeric(parmData[1,1])  ## with as.character used for the VAL value