Dlaczego load (...) zwraca nazwę znaku obiektu zamiast samego obiektu?

Question

Model svm jest tworzony z pakietem e1071 w R. Aby użyć modelu, muszę go zapisać i przeczytać w razie potrzeby. Pakiet ma numer write.svm, ale nie ma read.svm. Jeśli używam obiektu zawiera tylko słowo "model".

Jak zapisać model svm i przeczytać go później, aby zastosować się do nowych danych?

Answer 1

Spójrz na wartości zwracanej przez funkcję load w pliku pomocy:

Wartość:

A character vector of the names of objects created, invisibly. 

Więc "model" jest rzeczywiście wartość oczekiwana M. Twój svm został przywrócony pod oryginalną nazwą, która jest model.

Jeśli uznasz za nieco mylące, że load nie zwraca obiektu załadowanego, ale zamiast go przywraca pod nazwą używaną do zapisania go, rozważ użycie saveRDS i readRDS.

saveRDS(model, 'modelfile.rds') 
M <- readRDS('modelfile.rds') 

i M powinien zawierać Twój model svm.

Wolę saveRDS i readRDS, ponieważ z nimi wiem, jakie obiekty tworzę w moim obszarze roboczym - zobacz blog na stronie Gavina Simpsona (powiązany w jego odpowiedzi) na szczegółową dyskusję.

Answer 2

Nie rozumiesz, co robi load. Przywraca obiekt do tej samej nazwy, którą miał przy sobie. To, co widzisz w M, jest wartością zwracaną funkcji load(). Wywołanie load() ma dodatkowy efekt uboczny ładowania obiektu z powrotem pod tą samą nazwą, w której został zapisany.

Rozważmy:

require("e1071") 
data(iris) 

## classification mode 
# default with factor response: 
model <- svm (Species~., data=iris) 
## Save it 
save(model, file = "my-svm.RData") 
## delete model 
rm(model) 
## load the model 
M <- load("my-svm.RData") 

Spójrzmy teraz na obszarze roboczym

> ls() 
[1] "iris" "M"  "model" 

Stąd model został przywrócony jako efekt uboczny load().

Od ?load widzimy powód M zawiera nazwę obiektów stworzonych (a więc zapisany pierwotnie)

Value: 

    A character vector of the names of objects created, invisibly. 

Jeśli chcesz przywrócić obiekt do nowej nazwy, należy saveRDS() i readRDS():

Aby uzyskać więcej informacji na temat saveRDS() i readRDS(), zobacz odpowiednią pomoc ?saveRDS(), a może Cię zainteresować blog post I wrote on this topic.