Além da sugestão do @Fernandes, que deve seguir, há outro problema. Se o R está a ler os valores como strings deverá haver valores não numéricos no ficheiro. Uma maneira de resolver isso é, depois de ler a base, correr

    pr[-c(1, 4)] <- lapply(pr[-c(1, 4)], function(x) as.numeric(as.character(x)))

Isto funciona mesmo que as colunas sejam de classe `factor`.  
Depois poderá inspecionar as colunas de classe `numeric` para ver se há valores `NA`.   
Caso haja, talvez seja também util inspecionar o ficheiro e ver quais os valores que estão a causar problemas. É possível desembaraçar-se deles logo na leitura com o argumento `na.strings`. Veja a página `help("read.table")` para ver como usar `na.strings`.