كيفية رسم أسطورة خارج المؤامرة في r
أسهل طريقة لرسم وسيلة إيضاح خارج مخطط R الأساسي هي إضافة مساحة إضافية إلى يمين المخطط باستخدام بناء الجملة التالي:
by( mar =c(5, 4, 4, 8), xpd= TRUE )
يوضح المثال التالي خطوة بخطوة كيفية استخدام بناء الجملة هذا عمليًا.
الخطوة 1: إنشاء البيانات
أولاً، لنقم بإنشاء بعض البيانات للعمل عليها:
#create data frames df1 <- data. frame (x=c(1, 2, 3, 4, 5, 6, 7), y=c(2, 7, 19, 26, 24, 29, 31)) df2 <- data. frame (x=c(1, 2, 3, 4, 5, 6, 7), y=c(4, 4, 7, 9, 12, 13, 8))
الخطوة 2: قم بإنشاء قطعة أرض تحتوي على وسيلة إيضاح خارج الحبكة
بعد ذلك، لنقم بإنشاء مسار وإضافة وسيلة إيضاح خارج المسار في الزاوية اليمنى العليا:
#add extra space to the right of the plot
by( mar =c(5, 4, 4, 8), xpd= TRUE )
#plot both data frames
plot(y ~ x, df1, pch =1, main=" Scatterplot with multiple groups ")
points(y ~ x, df2, pch =3)
#add legend outside of plot
legend(" topright ", inset =c(-0.2, 0), legend =c(" df1 "," df2 "), pch =c(1,3), title =" Data ")
الخطوة 3: تغيير موقع وسيلة الإيضاح
يمكن استخدام الوسيطة inset(x, y) للتحكم في موقع وسيلة الإيضاح على يمين قطعة الأرض. على سبيل المثال، يمكننا أن نجعل الوسيطة x أكثر سلبية لدفع وسيلة الإيضاح إلى اليمين أكثر:
#add extra space to the right of the plot
by( mar =c(5, 4, 4, 8), xpd= TRUE )
#plot both data frames
plot(y ~ x, df1, pch =1, main=" Scatterplot with multiple groups ")
points(y ~ x, df2, pch =3)
#add legend outside of plot
legend(" topright ", inset =c(-0.3, 0), legend =c(" df1 "," df2 "), pch =c(1,3), title =" Data ")
يمكننا أيضًا أن نجعل الوسيطة y أكثر إيجابية لدفع وسيلة الإيضاح إلى الأسفل:
#add extra space to the right of the plot
by( mar =c(5, 4, 4, 8), xpd= TRUE )
#plot both data frames
plot(y ~ x, df1, pch =1, main=" Scatterplot with multiple groups ")
points(y ~ x, df2, pch =3)
#add legend outside of plot
legend(" topright ", inset =c(-0.3, .5), legend =c(" df1 "," df2 "), pch =c(1,3), title =" Data ")
لا تتردد في تعديل قيم الوسيطة الداخلية (x، y) لتغيير موقع وسيلة الإيضاح.
يمكنك العثور على المزيد من دروس R على هذه الصفحة .