search for: concurrentusag

Displaying 1 result from an estimated 1 matches for "concurrentusag".

Did you mean: concurrentusage
Locating inefficient code
2013 Sep 27
2
Locating inefficient code
....3:8209 ESTABLISHED tcp 0 0 172.20.100.2:60247 172.20.100.3:8209 ESTABLISHED Here I am just splitting at colons and getting IP's and ports. That is all. Can this code improved ? data <- read.table("D:\\Log Analysis\\26-9-2013\\concurrentusage-node1",sep="",header=T,stringsAsFactors=FALSE, fill=TRUE) var <- c("Foreign.Address") data[,var] <- sapply(data[,var],function(x) ifelse(length(unlist(str_split(x,":")))==5,unlist(str_split(x,":"))[4],unlist(str_split(x,":"))[1])) var...