Başlık olarak diyor ki:Nasıl temel grafik kullanarak çizim alanının dışında bir efsane yapabilir miyim?

Düşündüm işe yaramaz etrafında layout ve üretmek boş bir arsa için sadece içeren efsane, ama ben ile ilgilenir bir şekilde kullanarak sadece temel grafik olanakları ve örneğin, par(mar = ) için biraz boşluk sağ taraftaki arsa için efsane.

İşte bir örnek:

plot(1:3, rnorm(3), pch = 1, lty = 1, type = "o", ylim=c(-2,2))
lines(1:3, rnorm(3), pch = 2, lty = 2, type="o")
legend(1,-1,c("group A", "group B"), pch = c(1,2), lty = c(1,2))

üretir:

Ama dediğim gibi, efsane çizim alanının dışında (örneğin, grafiğin sağ/arsa. olmak istiyorum

Kimse legend inset kullanarak negatif değerler söz etti. İşte bir örnek, efsane ve hikayenin doğru olduğu, üst hizalanmış (anahtar kelime "topright" kullanarak).

# Random data to plot:
A <- data.frame(x=rnorm(100, 20, 2), y=rnorm(100, 20, 2))
B <- data.frame(x=rnorm(100, 21, 1), y=rnorm(100, 21, 1))

# Add extra space to right of plot area; change clipping to figure
par(mar=c(5.1, 4.1, 4.1, 8.1), xpd=TRUE)

# Plot both groups
plot(y ~ x, A, ylim=range(c(A$y, B$y)), xlim=range(c(A$x, B$x)), pch=1,
               main="Scatter plot of two groups")
points(y ~ x, B, pch=3)

# Add legend to top right, outside plot region
legend("topright", inset=c(-0.2,0), legend=c("A","B"), pch=c(1,3), title="Group")

inset=c(-0.2,0) ilk değer efsane genişliğine göre ayarlanması gerekebilir.