2016-04-07 22 views
0

Önişleme işlevinden bir nesneyi nasıl oluşturacağınızı bilmek istiyorum ('kartuş' paketinden).R'de 'preprocess' işlevinden nasıl bir nesne oluşturulur?

Aşağıdaki kod herhangi bir nesne yaratmak değil ve nedenini anlamıyorum:

function(dt1, dt2, norm = "spatialSign"){ 
X<-dt1[ ,-ncol(dt1)] 
Y<-dt1[ ,ncol(dt1)] 
t<-holdout(Y, ratio = 8/10, mode = "random") 
prepr<-preProcess(X[t$tr, ], method = norm)} 

Ben işlev çağrısı sonunda bir Prepr nesneyi elde etmek istiyorum.

Yardımcı olabilir misiniz?

cevap

0

here numaralı işlevleri hakkında daha fazla bilgi için bu çok basit bir soru.

Fakat şimdilik, işlevinizi nasıl çağırmak istediğinize bağlı olarak birden fazla çözüm var.

my_func <- function(dt1, dt2, norm = "spatialSign"){ X <- dt1[ , -ncol(dt1)] Y <- dt1[ , ncol(dt1)] t <- holdOut(Y, ratio = 8/10, mode = "random") prepr <- preProcess(X[t$tr, ], method = norm) }

Ardından işlevi çağırmak ve bir nesne depolamak için fonksiyon tanımlamak

my_outcome <- my_func(dt1, dt1) 
  • yerel Prepr atamak
      <<- işleciile bir genel değişkene değişken kodunuzda olduğu gibi

    my_func <- function(dt1, dt2, norm = "spatialSign"){ X <- dt1[ , -ncol(dt1)] Y <- dt1[ , ncol(dt1)] t <- holdOut(Y, ratio = 8/10, mode = "random") prepr <<- preProcess(X[t$tr, ], method = norm) }

    0 ve sonra işlevini kullanın.

    my_func(dt1, dt2)

    Ama ne olup bittiğini daha açık bir şekilde gösterdiği gibi ilk seçeneği tavsiye ve bunu ihtiyacı işlevine değişiklik yapmak istiyorsanız tek bir yerde sadece yapılacak.

  • +0

    "<< -" operatörü hile yaptı! – Symphoenix

    İlgili konular