Skip to content

Instantly share code, notes, and snippets.

@pbiecek
Created January 18, 2015 21:38
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save pbiecek/ba610de8d42478ecd65b to your computer and use it in GitHub Desktop.
Save pbiecek/ba610de8d42478ecd65b to your computer and use it in GitHub Desktop.
cnames <- names(studenci)
attr(studenci$PV1MATH,'value.labels') <- NULL
attr(studenci$PV2MATH,'value.labels') <- NULL
attr(studenci$PV3MATH,'value.labels') <- NULL
attr(studenci$PV4MATH,'value.labels') <- NULL
attr(studenci$PV5MATH,'value.labels') <- NULL
attr(studenci$W_FSTUWT,'value.labels') <- NULL
for (i in which(cnames=='W_FSTR1'):which(cnames=='W_FSTR80')) {
attr(studenci[,i],'value.labels') <- NULL
}
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment