Как остановить печать для функции "ps" в пакете "twang"?

Question

Функция "ps" (оценка показателя склонности) в пакете "twang" в R продолжает печатать свой отчет.Как я могу отключить это?

Я уже пытался установить аргумент "print.level" равным 0. Но он не работает для меня.

D = rbinom(100, size = 1, prob = 0.5)
X1 = rnorm(100)
X2 = rnorm(100)
ps(D ~ ., data = data.frame(D, X1, X2), stop.method = 'es.mean',  
estimand = "ATE", print.level = 0)

Я надеюсь, что естьнет печати процесса, но он продолжает давать мне что-то вроде:

Подгонка модели gbm Iter TrainDeviance ValidDeviance StepSize Improve 1 1,3040 нан 0,0100 нан 2 1,3012 нан 0,0100 нан 3 1,2985 нан 0,0100 нан 4 1,2959 нан 0,0100 нан 5 1,2932нан 0,0100 нан 6 1,2907 нан 0,0100 нан 7 1,2880 нан 0,0100 нан 8 1,2855 нан 0,0100 нан 9 1,2830 нан 0,0100 нан 10 1,2804 нан 0,0100 нан 20 1,2562 нан 0,0100 нан .....

, что раздражает.

Answer 1

Предположительно, вы хотите записать результат в переменную;если вы объедините это с параметром verbose = FALSE, он должен делать то, что вам нужно:

res <- ps(D ~ ., data = data.frame(D, X1, X2), stop.method = 'es.mean', 
   estimand = "ATE", print.level = 0, verbose = FALSE)

Я не проверял, нужен ли вам еще print.level = 0.