解決してないです...
labels <- expression (0, pi/2, pi, 3*pi/2, 2*pi) axis (side=1, at = seq(0, 2 * pi, pi / 2), lab = labels)
これの最初の0をPiに
labels <- expression (Pi, pi/2, pi, 3*pi/2, 2*pi) axis (side=1, at = seq(0, 2 * pi, pi / 2), lab = labels)
意味のわからないバグだなぁ...
全角があって良かったと思う瞬間だよ...(トホホ
labels <- c ("0", "π / 2", "π", "3π / 2", "2π") axis (side=1, at = seq(0, 2 * pi, pi / 2), lab = labels)