# Access Papua New Guinea PPI table
ppiPNG2023
# Given a specific PPI score (from 0 - 100), get the row of poverty
# probabilities from PPI table it corresponds to
ppiScore <- 50
ppiPNG2023[ppiPNG2023$score == ppiScore, ]
# Use subset() function to get the row of poverty probabilities corresponding
# to specific PPI score
ppiScore <- 50
subset(ppiPNG2023, score == ppiScore)
# Given a specific PPI score (from 0 - 100), get a poverty probability
# based on a specific poverty definition. In this example, the USAID
# extreme poverty definition
ppiScore <- 50
ppiPNG2023[ppiPNG2023$score == ppiScore, "percentile20_wi"]
Run the code above in your browser using DataLab