Ошибка при попытке добавить строку в фрейм данных

Question

Я довольно нуб в R, и это сводит меня с ума. Когда я пытаюсь добавить новую строку в этот фрейм данных, это дает мне эту странную ошибку, и вместо добавления нового имени она добавляет. Кто-нибудь знает как это решить? Мне действительно нужна помощь

MENU <- function()
{
  P1=readline(prompt="Insert Name1:")

  P2=readline(prompt="Inset Name2:")
  TA=data.frame(names=c(P1,P2),games=c(0,0),points=c(100,100),stringsAsFactors= F)

  write.table(TA,"C://Users//aleja//Documents//names.txt")

  TA=read.table("C://Users//aleja//Documents//names.txt")

  P1=readline(prompt="Insert Name1:")

  new=list(names=P1,games=0,points=100)

  TA=rbind(TA,new)
}

Вот что происходит:

Insert Name1:ale

Inset Name2:ana

Insert Name1:jose

**Warning message:
In `[<-.factor`(`*tmp*`, ri, value = "jose") :
  invalid factor level, NA generated**

Спасибо за помощь:)

Answer 1

Чтобы все функции выполнялись одинаково, это можно исправить следующим образом:

MENU<-fucntion()

{

P1=readline(prompt="Insert Name1:")

P2=readline(prompt="Inset Name2:")

TA=data.frame(names=c(P1,P2),games=c(0,0),points=c(100,100),stringsAsFactors= F)

write.table(TA,"C://Users//aleja//Documents//names.txt")

TA=read.table("C://Users//aleja//Documents//names.txt")

P1=readline(prompt="Insert Name1:")

new=data.frame(names=P1,games=0,points=100)

TA=rbind(TA,new)

}

Надеюсь, это поможет,