data("dna.obj")
x<-dna.obj
x<-as.dna(x[1:4,1:6])
## Coercing a 'Dna' object to a data.frame.
df<-as.data.frame(x)
df
# TRUE
is.data.frame(df)
if (FALSE) {
# gives the same result
df<-as.data.frame(x@sequence)
df
}
Run the code above in your browser using DataLab