Historia

[lgelmo]

Przepraszam, to jeszcze raz ja w sprawie dodawania wpisów do historii. Musiałem zmienić pomysł na zapisywanie do historii i w związku z tym proszę aby w każdej funkcji zamienić linijkę add_to_history("nazwa_twojej_funkcji") na linijkę o treści :

.hugoEnv$history[length(.hugoEnv$history)+1]<-deparse(match.call())

Mam nadzieję, że już nie będzie problemu z błędami. Przetestowanie na hugo_memorize_plot() wyszlo pozytywnie, więc są szanse, że teraz zadziała.

[kromash]

W niektórych funkcjach (np. hugo_get_secret ale też innych) przy wywołaniu podanej linijki występuje następujący warning:

In .hugoEnv$history[length(.hugoEnv$history)] <- deparse(match.call()) :
  number of items to replace is not a multiple of replacement length

Problem występuje gdy długość wywoływanej funkcji jest większa niż 60 znaków.
Funkja deparse ma domyślny parametr width.cutoff ustawiony właśnie na 60, a po przekroczeniu tej liczby dzieli podanego stringa i tworzy wektor stringów z którym nie radzi sobie przypisanie.

Należy zmodyfikować podaną linijkę na następującą:

.hugoEnv$history[length(.hugoEnv$history)] <- paste(deparse(match.call()), collapse='')

Linijka jest długa i niepotrzebnie komplikuje każdy skrypt, więc proponuję stworzyć dodatkową funkcję add_to_history która przyjmowałaby jako argument match.call() i wykonywała na nim powyższą linie