2016-04-13 46 views
0

Tuhaf şekilleri koşullu renklerle doldurmaya ve bunu yapmanın bir yolunu bulmakta zorluk çekmeye çalışıyorum. İdeal olarak, her bir x noktasında 4 puan alan ve bu noktalar arasındaki alanda yer alan şekil oluşturucu olacaktır.Bir şekil üzerindeki 4 x, y noktalarındaki R biçimini çiz

İşte

Ben arsa oluşturmak için kullanıyorum kodudur şekli (x1, y1, x2, y2, x3, y3, x4, y4, col = 'siyah') gibi

:

plot(1,1,type='n',xlim=c(-250,250),ylim=c(0,420),cex.main=2.25,xaxt='n',yaxt='n',xlab="",ylab="") 
segments(0,0,-283,283,lwd=3.8) 
segments(0,0,283,283,lwd=3.8) 
library('plotrix') 
segments(sqrt(16200)/2,sqrt(16200)/2,-(300-(-sqrt(16200)/2))/tan(45),350,lty=2) 
segments(-sqrt(16200)/2,sqrt(16200)/2,(300-(-sqrt(16200)/2))/tan(45),350,lty=2) 
segments(0,sqrt(16200),-112.25,400,lty=2) 
segments(0,sqrt(16200),112.25,400,lty=2) 
segments(0,sqrt(16200),0,420,lty=2) 
draw.arc(0, 0, 250, deg1=47,deg2 =132, col = "black",lwd=1.8,lty=2) 
draw.arc(0, 0, 300, deg1=47,deg2 =132, col = "black",lwd=1.8,lty=2) 
draw.arc(0, 0, 350, deg1=47,deg2 =132, col = "black",lwd=1.8,lty=2) 
draw.arc(0, 0, 400, deg1=47,deg2 =132, col = "black",lwd=1.8,lty=2) 

Bu şekillerin her birinin içinde, başka bir veri kümesinden kaç tane şeye sahip olduğumu temel alan bir koşullu renk istiyorum. Renk biçimlendirmesini oluşturmak ama bu tuhaf şekilleri doldurmanın en iyi yolunu bulmak çok kolay! İşte

bu kod üretir budur: field

teşekkür ederiz!

cevap

1

Aradığınız işlevi polygon

x<-c(0,0,2,1) 
y<-c(0,1,2,0) 
plot(1, type="n", axes=T, xlab="", ylab="",xlim=c(0,2),ylim=c(0,2)) 
polygon(x,y,col="red") 

enter image description here

olduğunu