Я пытаюсь добавить стрелки (столбцы ошибок) к простому гистограмме.Первый работает, а последние два просто вызывают множество сообщений об ошибках, даже если они отформатированы одинаково!
secondtimes<-c(568.4667,604.2,585.8)
xabels<-c("1","2","3")
secondplot<-barplot(secondtimes,xlab = "Treatment",ylab = "Time taken / secs",ylim = c(0,800))
axis(1,at=secondplot,labels=xabels)
arrows(0.7, 522.3074, 0.7, 614.6259, length=0.05, angle=90, code=3)
arrows(1.9, 496.4951, 1.9, 496.4951, length=0.05, angle=90, code=3)
arrows(3.1, 482,3277,3.1, 689.2723, length=0.05, angle=90, code=3)
Ошибка в стрелках (1.9, 496.4951, 1.9, 496.4951, длина = 0.5, угол = 90,: неверная спецификация наконечника стрелы. Дополнительно: Предупреждающие сообщения: 1: In doTryCatch (return (expr),name, parentenv, handler): стрелка нулевой длины имеет неопределенный угол и поэтому пропущена 2: в doTryCatch (return (expr), name, parentenv, handler): стрелка нулевой длины имеет неопределенный угол и поэтому пропущена 3: в doTryCatch(return (expr), name, parentenv, handler): стрелка нулевой длины имеет неопределенный угол и поэтому пропускается 4: В doTryCatch (return (expr), name, parentenv, handler): стрелка нулевой длины имеет неопределенный угол итак пропущено