Displaying 5 results from an estimated 5 matches for "tf5".
Did you mean:
t5
2017 Jun 04
0
New var
...== DFM$bin, 1, ifelse( "[100,200)" < DFM$bin, 0, -1 ) )
DFM$tf3 <- ifelse( "[200,300)" == DFM$bin, 1, ifelse( "[200,300)" < DFM$bin, 0, -1 ) )
DFM$tf4 <- ifelse( "[300,400)" == DFM$bin, 1, ifelse( "[300,400)" < DFM$bin, 0, -1 ) )
DFM$tf5 <- ifelse( "[400,500)" == DFM$bin, 1, ifelse( "[400,500)" < DFM$bin, 0, -1 ) )
# less obvious approach using the fact that factors are integers
# and using the outer function to find all combinations of elements of two vectors
# and the sign function
DFM[ , paste0( "t...
2017 Jun 04
2
New var
...[100,200)" <
> DFM$bin, 0, -1 ) )
> DFM$tf3 <- ifelse( "[200,300)" == DFM$bin, 1, ifelse( "[200,300)" <
> DFM$bin, 0, -1 ) )
> DFM$tf4 <- ifelse( "[300,400)" == DFM$bin, 1, ifelse( "[300,400)" <
> DFM$bin, 0, -1 ) )
> DFM$tf5 <- ifelse( "[400,500)" == DFM$bin, 1, ifelse( "[400,500)" <
> DFM$bin, 0, -1 ) )
> # less obvious approach using the fact that factors are integers
> # and using the outer function to find all combinations of elements of two
> vectors
> # and the sign functi...
2017 Jun 03
2
New var
Thank you all for the useful suggestion. I did some of my homework.
library(data.table)
DFM <- read.table(header=TRUE, text='obs start end
1 2/1/2015 1/1/2017
2 4/11/2010 1/1/2011
3 1/4/2006 5/3/2007
4 10/1/2007 1/1/2008
5 6/1/2011 1/1/2012
6 10/5/2004 12/1/2004',stringsAsFactors = FALSE)
DFM
DFM$D =as.numeric(difftime(as.Date(DFM$end,format="%m/%d/%Y"),
2017 Jun 04
0
New var
...[100,200)" <
> DFM$bin, 0, -1 ) )
> DFM$tf3 <- ifelse( "[200,300)" == DFM$bin, 1, ifelse( "[200,300)" <
> DFM$bin, 0, -1 ) )
> DFM$tf4 <- ifelse( "[300,400)" == DFM$bin, 1, ifelse( "[300,400)" <
> DFM$bin, 0, -1 ) )
> DFM$tf5 <- ifelse( "[400,500)" == DFM$bin, 1, ifelse( "[400,500)" <
> DFM$bin, 0, -1 ) )
> # less obvious approach using the fact that factors are integers
> # and using the outer function to find all combinations of elements of two
> vectors
> # and the sign functi...
2010 Oct 26
7
puppetdoc and wrong comparison
...0 (GNU/Linux)
iQEVAwUBTMbnup+OKpjRpO3lAQp/8Af+JxugG9hPUWfayZLMDx5lziL78FMUjmHM
5OOnIN65lc8ME3fG7FzBIqMI+Q1UT9sVTgxANqA5FxP5kE9ObqPTpWfx7RHO4Rhv
MjUxM1q793caDOQHlUOZGS0bNy7n0bGLbXkH2acIIdgZjnPklI6+8zhbqIWlnxMo
suQrmc4YYygHIdN6llk+STwH6sEwcjXhKdvOLN+VMnSpQdcFo1IRMoS5bBHHx9cG
KAJ6m8qrKLHY/Zeqa00EIweN/Tf5+0HnP7izoVpjwzU6aOBAgWAGylJdjCKhyiFb
fTt+cXv1HaBZaVNeQ7GWU8I10Oc5q4sJPywE7Za7gnhcc/x/niYmCg==
=DDVX
-----END PGP SIGNATURE-----
--
You received this message because you are subscribed to the Google Groups "Puppet Users" group.
To post to this group, send email to puppet-users@googlegroup...