Displaying 1 result from an estimated 1 matches for "user_edit".
2008 May 07
1
i-best, grep function
...", "Size", "Height", "Area_in_Point", "Area_in_BP", "Data_Point", "Begin_Point", "Begin_BP", "End_Point", "End_BP", "Width_in_Point", "Width_in_BP", "User_Comments", "User_Edit"))
T1 <- subset(T1, Size < 1000 & Size > 50)
T1.B <- cbind(T1[grep("^B", as.character(T1$Color),perl=T),3],T1[grep("^B", as.character(T1$Color),perl=T),5])
T1.B <- cbind(T1.B, T1.B[,2]/sum(T1.B[,2]))
It works alright until the last two lines. I try to...