No he podido encontrar el ejemplo del video, pero este es otro similar que puse en otro psot para los análisis de tocino con otro equipo (Food Scan). Te pongo el código y si quieres que lo estienda me lo dices. En esta ecuasión los parámetros son los ácidos grasos en lugar de los otros. Espero que te sirva y muchas gracias por el comentario. fat<-read.table("tocino6.txt",header=TRUE) NIT<-as.matrix(fat[,7:106]) C16_0<-fat[,1] C16_1<-fat[,2] C18_0<-fat[,3] C18_1<-fat[,4] C18_2<-fat[,5] C18_3<-fat[,6] ------------------------------------------------------------------- >fattyac<-data.frame(C16_0=I(C16_0),C16_1=I(C16_1),C18_0=I(C18_0), +C18_1=I(C18_1),C18_2=I(C18_2),C18_3=I(C18_3),NIT=I(NIT)) ------------------------------------------------------------------- names(fattyac) # "C16_0" "C16_1" "C18_0" "C18_1" "C18_2" "C18_3" "NIT"
Excelente tema! la calidad del video no es muy buena, podría escribir la linea 11 del código?? gracias José
ResponderEliminarNo he podido encontrar el ejemplo del video, pero este es otro similar que puse en otro psot para los análisis de tocino con otro equipo (Food Scan). Te pongo el código y si quieres que lo estienda me lo dices. En esta ecuasión los parámetros son los ácidos grasos en lugar de los otros.
EliminarEspero que te sirva y muchas gracias por el comentario.
fat<-read.table("tocino6.txt",header=TRUE)
NIT<-as.matrix(fat[,7:106])
C16_0<-fat[,1]
C16_1<-fat[,2]
C18_0<-fat[,3]
C18_1<-fat[,4]
C18_2<-fat[,5]
C18_3<-fat[,6]
-------------------------------------------------------------------
>fattyac<-data.frame(C16_0=I(C16_0),C16_1=I(C16_1),C18_0=I(C18_0), +C18_1=I(C18_1),C18_2=I(C18_2),C18_3=I(C18_3),NIT=I(NIT))
-------------------------------------------------------------------
names(fattyac)
# "C16_0" "C16_1" "C18_0" "C18_1" "C18_2" "C18_3" "NIT"
José muchas gracias por responde!
EliminarSaludos