Skip to content

Instantly share code, notes, and snippets.

@JohnsonBrent

JohnsonBrent/example.R

Last active April 8, 2019 23:47
Show Gist options

  • Select an option

    Learn more about clone URLs
  • Save JohnsonBrent/18bb3f693cfcf3336ef165adc9e33e57 to your computer and use it in GitHub Desktop.

Select an option

Learn more about clone URLs
Save JohnsonBrent/18bb3f693cfcf3336ef165adc9e33e57 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
example.R
# Here below is a manual kruithof or ipf. It terates between targets in a loop using the scale.to.target function
# There aren't very many checks in the function, so...
# - Be sure the Targets don't have conflicting totals
# - Be sure you don't include additional variables in the targets
# - Check that it's converged
for (i in 1:5) {
EMP305$Employment <- scale.to.target(source=EMP305, target=Target2, dv="Employment") # Scale to CTRY
EMP305$Employment <- scale.to.target(source=EMP305, target=Target3, dv="Employment") # Scale to IND
EMP305$Employment <- scale.to.target(source=EMP305, target=Target5, dv="Employment") # Scale to Year
}
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment