Определите объект класса S3 «bar» и метод печати: foo=list(1) class(foo) <- c("bar") print.bar <- function(x,...){ cat("print.bar says this was ",deparse(substitute(x)),"\n") } Теперь print (foo) делает следующее: > print(foo)...

Я пытаюсь переопределить функцию print.anova() из пакета статистики R в локальном пакете, который я использую при обучении. По сути, я хочу удалить печать заголовка и добавить «итоговую» строку без создания новой функции (например, ANOVA()) с новым...

Здесь лучшие ответы описывают хороший способ сделать отправку метода для объектов S3 и S4. Однако этот способ работает только тогда, когда оба метода имеют одинаковую сигнатуру. Есть ли способ создать метод S4 для median с другой подписью?...

Учитывая среду x , удобным сокращением для assign(x, value, envir = e) будет запись e[[x]] <- value . В настоящее время не существует аналога оператора подмножества для присваивания сразу нескольких объектов: > e = new.env(parent =...

Я работаю над любимым проектом в R, который создает собственный класс S3 с именем groupr . Я написал несколько функций с точечной записью ( print.groupr , subset.groupr ), как описано в Учебник Hadley , но я хочу расширить функцию apply и не...

Я застрял с определением метода S3 для autoplot . У меня есть следующее (полный код здесь ): #' Autoplot for bigobenchmark object #' #' @importFrom ggplot2 autoplot #' #' @param object #' #' @return A ggplot2 plot #' @export #' #' @examples...

Я пытаюсь интегрировать функцию MiniBatchKmeans пакета ClusterR в mlr. Согласно документам , я внес следующие изменения: Создан makeRLearner.cluster.MiniBatchKmeans Создан trainLearner.cluster.MiniBatchKmeans Создан...

Я хотел бы иметь следующую общую функцию, которая проверяет разрешенные форматы (это работает), чем выполняет общую функцию, основанную на типе аргумента x (работает) оценивает операторы после вызова UseMethod() (не работает - как и...

Я пишу пакет R. В этом пакете я хочу иметь специальный тип фрейма данных, который могут распознавать некоторые функции, например, с некоторыми дополнительными атрибутами, но в остальном действующий точно так же, как фрейм данных. Один из способов...

У меня есть пакет R (в настоящее время его нет в CRAN), который определяет пару методов S3 общих функций из других пакетов (в частности, knitr::knit_print и huxtable::as_huxtable ). Однако они не являются ключевой частью моего пакета, поэтому я бы...

Я сравниваю лавовые объекты, используя semTools::compareFit . Выдает очень странное сообщение об ошибке. Я попробовал также следующий воспроизводимый пример: data("HolzingerSwineford1939",package="lavaan") HS.modelA <- '...

Если вы вызываете rep для матрицы, она повторяет ее элементы, а не всю матрицу. Традиционным решением является вызов rep(list(theMatrix),...) . Я хочу расширить rep , чтобы он делал это автоматически. я пытался использовать...

У меня возникли проблемы с написанием кода, который выполняет отправку по матрицам . Чтобы помочь мне, я хотел бы посмотреть, какие универсальные функции в базовой библиотеке отправляют на матрицы. Есть ли способ заставить R дать мне их список? В...