In r, come si imposta una classe S4 in base alla classe di un altro oggetto

Question

Devo creare un oggetto di tipo ShorTreadq dalla libreria Shortread di Bioconductor.

ShortReadQ 'signature(sread = "DNAStringSet", quality =
          "QualityScore", id = "BStringSet")'

Lo slot di qualità deve essere un oggetto che eredita da QualityScore, di cui posso facilmente determinare da un altro oggetto ShorTreadq che desidero emulare.

> class(quality(anotherObject))
[1] "SFastqQuality"
attr(,"package")
[1] "ShortRead"

Qual è il modo migliore per utilizzare tali informazioni ("Sfastqquality") nell'argomento del controllo?

newObject<-ShortReadQ(sread=...,
             quality=SFastqQuality(...), 
             id=...)

Answer 1

Grazie per le tue risposte. mi portano a una soluzione che funziona

newObject<-ShortReadQ(sread=...,
             quality=new(Class=class(quality(anotherObject)),theFirstParameter=...), 
             id=...)

Answer 2

Questo fa quello che vuoi?

quality = new(class(old.quality.obj)[[1]]))

Answer 3

Potresti voler la funzione Get:

a <- get(class(object))
a(...)