Displaying 1 result from an estimated 1 matches for "cuiep".
2008 Sep 03
2
basic dataframe question
...Helsel. 2005.
# "Create two new variables in the Interval Endpoints format, StartCu and EndCu,
# that will contain the same information given by the current variables
library(NADA)
data(CuZn)
names(CuZn)
StartCu <- ifelse(CuZn$CuCen == "TRUE", 0, CuZn$Cu)
EndCu <- CuZn$Cu
CuIEP = data.frame(cbind(Cu = CuZn$Cu, CuCen = CuZn$CuCen, StartCu, EndCu))
class(CuZn$CuCen)
#returns "logical"
class(CuIEP$CuCen)
#returns "numeric"
CuIEP2 = data.frame(cbind(Cu = CuZn$Cu, CuCen = as.logical(CuZn$CuCen), StartCu, EndCu))
class(CuIEP2$CuCen)
#returns "numeric&...