Прогресс расчета внутренних размеров c в R

Question

Я использую пакеты R "ider" и "intrinsicDimension". Только одна функция в пакете «intrinsicDimension»: pcaLocalDimEst, имеет подробный параметр, ни одна из функций в «ider» не имеет подробного параметра.

Есть ли способ получить ход вычислений?
Например, если я использую версию ядра оценки корреляционного измерения для определения внутреннего размера c:

estconvU <- convU (x = df, maxDim = 20) </p>

Как получить ход расчета?

Answer 1

Введите следующее:

fix(convU)

Измените первую строку, добавив "verbose=FALSE" в конец вызова функции:

 # -- - - - - - - - - - - - - - - - -vvvvvvvvvvvvv don't add this line
function (x, maxDim = 5, DM = FALSE, verbose=FALSE) # <- add this "verbose=FALSE"
 # -- - - - - - - - - - - - - - - - -^^^^^^^^^^^^^ don't add this line

Затем прокрутите вниз до строки 19 и добавьте следующее ПОСЛЕ инициализации для l oop:

19:  for (l in 1:maxDim) {
20:        if(verbose) cat(paste("Working...", l, "\n")) # Add this line.

Затем нажмите кнопку Сохранить внизу. Если вы допустили ошибку, R. будет жаловаться.

Если нет, вызовите функцию convU, но добавьте verbose=TRUE, и вы должны увидеть некоторые сообщения о прогрессе. Например, со страницы справки convU:

x <- gendata(DataName='SwissRoll', n=1200)
estconvU <- convU(x=x, verbose = TRUE)
Working... 1 
Working... 2 
Working... 3 
Working... 4 
Working... 5