2015-08-21 4 views
0

Итак, у меня есть сюжет с индивидуальными осями. Я хочу, чтобы оси были соединены, но они разделяются, когда я настраиваю их с помощью функции axis().Оси, выделенные на участке

Вот код, который создает сюжет:

plot(smodelesp0,col=2,lwd=2,xlab="Tiempo en Días",ylab="Proporción de Frees", 
main="Proporción de Usuarios Free pasados X días según Perfil",axes=F) 
axis(1,at=seq(0,250,by=10),labels=seq(0,250,by=10),lwd=2) 
axis(2,at=seq(0,1,by=0.1),labels=seq(0,1,by=0.1),lwd=2) 
lines(smodelesp1,col=4,lwd=2) 
legend("topright",c("Perfil de máximo riesgo","Perfil de mínimo riesgo"),col=c(2,4),lwd=2) 

Вот результат: enter image description here

Любая идея? Я пропускаю некоторый параметр в функции осей?

+2

Вы не предоставили никаких данных, так сюжет и проблема не являются [воспроизводимыми] (http: // s tackoverflow.com/questions/5963269/how-to-make-a-great-r-reproducible-example). Вероятно, вы также захотите указать 'xlim =' и 'ylim =' в графике, так как 'axis()' управляет только ярлыками, а не диапазоном значений. – MrFlick

+0

Подождите, вы просто захотите сделать 'box (bty =" l ")' после рисования осей, в этом случае также с 'lwd = 2'. –

ответ

2

Пример из файла помощи axis с подстройкой

plot(1:4, rnorm(4), axes = FALSE) 
axis(1, 1:4, LETTERS[1:4], lwd=2) 
axis(2, lwd=2) 

plot 1, mind the gap

Теперь присоединиться к ним с коробкой

box(bty="l",lwd=2) 

now with "L" shaped box

+0

У нас победитель! Благодарю вас! – intael

Смежные вопросы