R grafiklerinde

Question

"Eğri" fonksiyonunda kullanıcı tanımlı fonksiyonları kullanmak için farklı toplam alanlara (1'e kadar) sahip normal dağılımlı yoğunluk grafikleri üretmem gerekiyor.

sdnorm <- function(x, mean=0, sd=1, lambda=1){lambda*dnorm(x, mean=mean, sd=sd)} 

Ben daha sonra farklı parametreler kullanılarak fonksiyonunu çizmek istiyorum: göreceli alanı verir - aşağıdaki işlevi kullanarak, lambda belirtebilirsiniz.

require(ggplot2) 
qplot(x, geom="blank") + stat_function(fun=sdnorm,args=list(mean=8,sd=2,lambda=0.7)) + 
    stat_function(fun=sdnorm,args=list(mean=18,sd=4,lambda=0.30)) 

ama gerçekten ben "eğri" işlevini kullanmaya ihtiyacım var bunun için baz R grafikleri, bunu yapmak istiyorum: ggplot2 kullanarak, bu kod çalışır. Ancak, bunu işe almak için mücadele ediyorum.

Answer 1

, ilk argüman farklı şeyler bir dizi olabileceğini görürsünüz:

bir fonksiyonun adı veya bir arama veya bir ifade x ile aynı uzunlukta bir nesneyi değerlendirecek x fonksiyonu olarak yazılır.

Bu tıpkı böylece sen, bir işlev adı veya bir ifadesi ya ilk argüman belirtebilirsiniz anlamı:

curve(sdnorm) 

varsayılan argümanlarla fonksiyonun bir arsa almak için. Aksi takdirde, ggplot2 temsilini yeniden yapmak istediğiniz olacaktır:

curve(sdnorm(x, mean=8,sd=2,lambda=0.7), from = 0, to = 30) 
curve(sdnorm(x, mean=18,sd=4,lambda=0.30), add = TRUE) 

sonucu:

Answer 2

Ne ylab = 'y' eklendi ve y-eksenini yeniden etiketli olması resim güncellenmiş

x <- seq(0, 50, 1) 
plot(x, sdnorm(x, mean = 8, sd = 2, lambda = 0.7), type = 'l', ylab = 'y') 
lines(x, sdnorm(x, mean = 18, sd = 4, lambda = 0.30)) 

EDIT'e baz Ar aşağıdakileri yapabilirsiniz.

Bu başlangıç ​​almalısınız. Eğer ? curve için yardım dosyasına bir göz atacak olursak