Displaying 3 results from an estimated 3 matches for "ind6".
Did you mean:
ind
2011 Mar 10
2
within group sequential subtraction
...s within a group so that I know the
time between separate observations for a group of individuals.
My data:
data <- structure(list(group = c("IND1", "IND1", "IND2",
"IND2", "IND2", "IND3", "IND4", "IND5",
"IND6", "IND6"), date_obs = structure(c(6468,
7063, 9981, 14186, 14372, 5129, 9767, 11168, 10243, 10647), class =
"Date")), .Names = c("group",
"date_obs"), row.names = c(NA, 10L), class = "data.frame")
So I start with:
group date_obs
1 IND1...
2005 Jul 25
0
lda: scaling to 'disctiminant function'
...EW$PS, EW$CON, EW$SER, EW$FIN,
EW$SPS, EW$TC)
Dep <- EW$GROUP
LDA <- lda(Dep ~ Ind, prior=c(1,1,1)/3)
So far so good.
I have....
> LDA$scaling
LD1 LD2
Ind1 1.3415788 3.689959
Ind2 1.5118460 5.215123
Ind3 1.4480197 3.653298
Ind4 2.1898063 3.875867
Ind5 1.2055849 3.913750
Ind6 0.8257858 3.718032
Ind7 1.3481728 3.699259
Ind8 1.2364320 3.871438
Ind9 2.0652630 2.891655
What do I do with this to convert it to the coefficients for the
discrimination functions?
cheers
Worik
2010 Feb 02
1
ggplot/time series with indicators question
Hello, I am trying to plot time-series data with certain weeks highlighted using symbols.
require(ggplot2)
#plotting time series data
timescale <- seq(as.Date("01/01/09","%m/%d/%y"), length.out=12, by=7)
data.all <- data.frame(
id = c(rep('111',12),rep('222',12),rep('333',12)),
week=c(timescale,timescale,timescale),