Use readLines()
(with warn = FALSE
) to read the file into a character vector first.
After that use the text =
option to read the vector into a data frame with read.table()
pheasant <- read.table(
text = readLines(file.choose(), warn = FALSE),
header = TRUE,
sep = ","
)