mapply를 사용하여 다중 물류 곡선 플로팅

Question

로지스틱 회귀 모델에 대한 20 개의 인터셉트 및 계수 세트가 있습니다. 나는 그것들을 하나의 그래프에 모두 그려보고 싶다. (이상적으로는 ggplot이 아닌 base를 사용하는 것이 이상적이다.) 나는이 같은 하나의 곡선을 그릴 :

x = datapoints 
curve(plogis(intercept + coef*x), min(x), max(x), add=TRUE) 

는 선형 모델이 작업을 수행하기를, 나는 mapply 사용할 수 있습니다

a = intercepts 
b = coefs 
mapply(abline, a,b) 

사용하는 방법이 있나요 mapply 또는 curve 및 plogis에와 비슷한 루프를 사용하지 않습니까?

Answer 1

당신은 재현 예를 제공하지 않았지만,이 개념의 증거입니다 :

x = runif(20)/2 
plot(x, bty="l", ylim=c(0,1)) 

a = runif(20)/100 
b = runif(20)/4 
my.func <-function(intercept,coefs) curve(plogis(intercept+coefs*x), add=TRUE) 
mapply(my.func,a,b)