height <- c(180, 175, 168, 173, 165) 
 nm <- c("LEE", "KIM", "PARK", "KANG", "SONG") 
 names(height) <- nm 
 height 
 names(height) <- NULL 
 height