나는 시뮬레이션을 실행 중이므로 다른 크기의 수식의 성능을 테스트해야합니다. 열 V1, V2, V3 ... Vk가있는 데이터 프레임에서 그리기, 나는 프로그래밍 방식으로 수식을 fit <- ols(y ~ V1 + V2 + V3, data=dataframe)
등과 같이 만들 필요가 있습니다.프로그래밍 방식으로 수식 단어 추가
수식의 길이를 조정할 수 있도록 수식을 코딩하려면 어떻게해야합니까?
나는 시뮬레이션을 실행 중이므로 다른 크기의 수식의 성능을 테스트해야합니다. 열 V1, V2, V3 ... Vk가있는 데이터 프레임에서 그리기, 나는 프로그래밍 방식으로 수식을 fit <- ols(y ~ V1 + V2 + V3, data=dataframe)
등과 같이 만들 필요가 있습니다.프로그래밍 방식으로 수식 단어 추가
수식의 길이를 조정할 수 있도록 수식을 코딩하려면 어떻게해야합니까?
당신은 수식에 텍스트를 변환 할 수 있습니다
vars <- c(1, 2, 4)
formula.text <- paste0("y ~ V", paste(vars, collapse=" + V"))
formula.text
# [1] "y ~ V1 + V2 + V4"
library(rms)
fit <- ols(as.formula(formula.text), data=dataframe)
당신은 reformulate
를 사용할 수 있습니다
k <- 4
reformulate(paste0("V", seq(k)), response = "y")
# y ~ V1 + V2 + V3 + V4
이것은 매우 우아합니다, 고마워요! – koenbro
당신이'OLS 할 수 (Y를 ~.)'? –
@BlueMagister 나는 같은 아이디어를 가지고 있었지만'ols (y ~., data = dat)'을 사용하여 예제를 만들 때'terms.formula'가 데이터 인수를 전달받지 못하기 때문에 오류가 발생했습니다. – Roland