daily pastebin goal
13%
SHARE
TWEET

Untitled

a guest Feb 25th, 2018 61 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. for (i in names(WaFramesCosts)) {
  2.       WaFramesCosts[[i]][,c("Cost_Center","Domestic_Anytime_Min_Used","Department",
  3. "Domestic_Anytime_Min_Used")]
  4.  
  5.     }
  6.    
  7. Error in `[.data.frame`(WaFramesCosts[[i]], , c("Cost_Center", "Department",  :
  8.   undefined columns selected
  9.    
  10. for (i in seq_along(WaFramesCosts)){
  11. WaFramesCosts[[i]][ , -which(names(WaFramesCosts[[i]]) %in% c("Cost_Center","Domestic_Anytime_Min_Used","Department",
  12.     "Domestic_Anytime_Min_Used"))]
  13.    
  14. for (i in seq_along(WaFramesCosts)) {
  15.     t <- WaFramesCosts[[i]][ , grepl( "Domestic" , names( WaFramesCosts[[i]] ) )]
  16.     q <- subset(WaFramesCosts[[i]], select = c("Cost_Center","Domestic_Anytime_Min_Used","Department","Domestic_Anytime_Min_Used"))  
  17.  
  18.     WaFramesCosts[[i]] <- merge(q,t)
  19.   }
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top