En R, ¿cómo configura una clase S4 basada en la clase de otro objeto?

Question

Necesito crear un objeto de tipo shortreadq a partir de la biblioteca Shortread de bioconductor.

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

La ranura de calidad debe ser un objeto que herede de QualityScore, del cual puedo determinar fácilmente a partir de otro objeto ShortreadQ que deseo emular.

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

¿Cuál es la mejor manera de usar esa información ("SFASTQQUALALY") en el argumento del Contructor?

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

Answer 1

Gracias por tus respuestas. Me llevan a una solución que funcione

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

Answer 2

¿Hace esto lo que quieres?

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

Answer 3

Es posible que desee la función Get:

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