x < - 1:10
yt - c (0,9, 0,92, 0,94, 0,96, 0,98, 1, -0,98, -0,96, -0,94, -0,92) [ 112]
cols < - ifelse (y> = 0, 2, 4)
yy < - y yy [y < 0] < - yy [y < 0] + 2
plot (x, yy, col = cols, yaxt = "n", pch = 19, type = "b", ylab = "Value", xlab = "Time [секунд]" )
ось (2, at = yy, метки = y, las = 2)
blockquote>Я не автор решения.
БРОСОК () один или оба из столбцов источника как десятичный/плавающий/реальный/двойной/и т.д. тип.