함수가 만드는 플롯 제목에서 함수 변수 (x 및 y)를 사용하는 방법

Question

선형 회귀 및 잔차를 그래프로 표시하는 함수를 만드는 중입니다. 함수의 본문을 만들었지 만, 제목과 축 레이블과 같은 생성 된 플롯에 자세한 내용을 추가하고 싶습니다. 특히, 음모의 제목을 함수에 입력 된 변수로 바꾸려면 다음과 같이하십시오. "y by x"여기서 y와 x는 함수에 입력 된 이름입니다. 이 작업을 수행하기 위해 paste() 및 print()를 사용해 보았지만 성공하지 못했습니다. 또한 rnorm (10)을 사용하여 x 및 y 값을 생성했지만 함수에 입력 한 값을 반영하기 위해 제목을 "rnorm (10) by rnorm (10)) "대신"print (y) by print (x) "로 나타납니다. 이 작업을 수행하는 데 사용할 올바른 코드에 대한 제안 사항은 무엇입니까?

reslines <- function(x,y) 
{ 
x <- x 
y <- y 
plot(y~x, pch=20, col=1, title=print(y) by print(x)) 
lm.xy <- lm(y~x) 
abline(lm.xy) 
segments(x0 = x, y0 = y, y1 = predict(lm.xy), col = 130) 
summary(lm.xy) 
} 

reslines(rnorm(10,rnorm(10)) 

Answer 1

이 시도 :

이

reslines <- function(x, y) { 
# x <- x 
# y <- y 
plot(y ~ x, pch = 20, col = 1, main = paste(c(substitute(y), "by", substitute(x)), collapse = " ")) 
lm.xy <- lm(y ~ x) 
abline(lm.xy) 
segments(x0 = x, y0 = y, y1 = predict(lm.xy), col = 130) 
summary(lm.xy) 
} 

reslines(rnorm(10), rnorm(10))