Puedes hacer esto con la función paste:
for (k in 1:4)
{ read.table(paste("Genotipo",k,".txt",sep=""))}
Foro de debate
Como hacer un for conapertura de varios archivos con numeracion diferente
This forum has a limit to the number of forum postings you can make in a given time period - this is currently set at 5 posting(s) in 1 day