Displaying 1 result from an estimated 1 matches for "swmean".
Did you mean:
smean
2005 Oct 19
2
Automatic rounding of values after factors , converted to numeric, are multipled by a real number
...ta$Cruise,len
data$Station,lendata$Region,lendata$Total),mean)
wgts<-wgts[order(wgts$Group.3,wgts$Group.1,wgts$Group.1),]
names(wgts)<-c("Cruise","Station","Region","Total","MLen")
wgts$Total<-as.numeric(levels(wgts$Total))[wgts$Total]
wgts$swmean<-with(wgts,wgts$Total*wgts$MLen)
When I run it, I get:
Cruise Station Region Total MLen swmean
3 2350 256 1 2 70.50000 141
5 2350 254 1 3 73.33333 220
6 2350 287 1 3 65.66667 197
9 2350 232 1 4 75.25000 301
10...