R: plot.new еще не был вызван

Question

я знаю, это очень старая проблема, упомянутая в plot.new, еще не была вызвана и т. Д., Но, тем не менее, ответы там, где у меня не работает, поэтому я должен спросить ее снова:

Я читаю короткую таблицу из 30 строк с данными, две разные таблицы:

lines <-scan("Wanna.txt", what="character", sep='\n')

Она имеет следующую структуру:

AA BB
5  149
12 5
15 5
100 7
...
AA BB
5 1
10 136
23 150
100 3

Затем я читаютаблицы в структуру данных:

Wanna5 <- read.table(textConnection(lines[1:5]), header=TRUE)
Wanna15 <- read.table(textConnection(lines[7:11]), header=TRUE)

Когда я делаю ggplot, это работает

ggplot(data=Wanna5, mapping= aes(x=AA, y=BB)) + geom_line()

Когда я пытаюсь добавить простой второй набор данных

lines(Wanna15$AA, Wanna15$BB, type="l", col="green")

Это говорит мне старую ошибку:

Error in plot.xy(xy.coords(x, y), type = type, ...) : 
plot.new has not been called yet

Что делать?

Answer 1

Похоже, вы смешиваете ggplot и base R. Вместо создания первого графика и последующего добавления линий, почему бы вам просто не создать весь график с помощью ggplot? Это будет выглядеть так:

ggplot() + geom_line(data=Wanna5, mapping= aes(x=AA, y=BB))
             + geom_line(data = Wanna15, aes(x = AA, y = BB), 
                         col = 'green')

Это помогает?