data-raw/processDocuments.R

In validmeasures/liberiaNutriBudget: Liberia Budget Datasets for Nutrition Budget Analysis in R

################################################################################
#
# Load libraries
#
################################################################################

library(pdftools)
library(tm)
library(stringr)
library(tidyr)
library(dplyr)
library(tidytext)

################################################################################
#
# Read docs
#
################################################################################

x <- pdf_text(pdf = "data-raw/documents/natHealthPolicyPlan2011.pdf")
x <- str_split(x, pattern = "\n")

## page 11
x[[11]][14] <- "illnesses, while new diseases reflecting changes in lifestyle and diet threaten the population."
x[[11]][15] <- "    The analysis process also identified the extent to which social resilience and capacity to cope, or social"
x[[11]][16] <- "capital, has deteriorated as a result of the civil conflict and the extent to which the population is vulnerable."
x[[11]][19] <- "in both urban and rural areas do not closely reflect the size of the catchment population and facility workload."
x[[11]][30] <- "delivery needs. The system as a whole must become more efficient by equitably allocating resources according"

## page 12
x[[12]][1]  <- "  efficiency, sustainability and accountability. The Primary Health Care approach encompassing community em-"
x[[12]][6]  <- "  and a planned Essential Package of Social Services (EPSS). The EPHS prioritizes services that reflect the prevailing"

## page 13
x[[13]][18] <- "is confident that this 2011 policy's orientation is evidence-based and reflects the best information and guidance"
x[[13]][21] <- "communities, civil society and religious groups as well as district, county and national government officials"
x[[13]][34] <- "impact on efficiency and effectiveness must become the measures by which all efforts are assessed in order to"
x[[13]][36] <- "and must become more effective by"
x[[13]]     <- x[[13]][c(1:36, 40:41)]

## page 14
x[[14]]     <- str_replace_all(string = x[[14]], pattern = "W%", replacement = "-")
x[[14]][8]  <- "  At the same time, the health and social welfare sector must become more efficient by:"
x[[14]][18] <- "National Health and Social Welfare Plan is the instrument devoted to the implementation of this policy."

## page 15
x[[15]][8]  <- "improving - but the impact of the civil conflict will make it difficult to achieve most of the MDGs. According to"
x[[15]][9]  <- "the World Bank and IMF's 2010 Economic Outlook, Liberia's 2010-estimated per-capita gross domestic prod-"
x[[15]][17] <- "    The 2008 National Population and Housing Census (NPHC) reported 17 major ethnic affiliations. Most"
x[[15]][18] <- "Liberians (86 percent) identified themselves as Christian, while Muslims made up 12 percent and Other 2"
x[[15]][19] <- "percent. Of the 15 administrative counties, the big six (Montserrado, Nimba, Bong, Lofa, Grand Bassa and"
x[[15]][20] <- "Margibi) accounted for 75 percent of the total population. The census identified a population growth rate of"
x[[15]][25] <- "respondents were displaced during the civil conflict and over 90 percent had resettled by 2008; however, an"
x[[15]] <- x[[15]][c(1:33, 35:36)]

## page 16
x[[16]] <- str_replace_all(string = x[[16]], pattern = "   ", replacement = "")

x[[16]][3]  <- "reverse the alarming trends identified in the DHS."
x[[16]][16] <- "attributable to malaria. However, the under-five malaria prevalence has been"
x[[16]][17] <- "significantly reduced from 66 to 32 percent since 2005. The 2007 DHS found"
x[[16]][26] <- "sis, lymphatic filariasis, schistosomiasis and leprosy in all 15 counties."
x[[16]] <- x[[16]][c(1:36, 40:41)]

## page 17
x[[17]][13] <- "also found that 43 percent of households have access to an improved sanitary facility, while significant rural/"
x[[17]][18] <- "resilience and capacity to cope, or social capital, has deteriorated as a result of the civil conflict. Nevertheless,"
x[[17]][21] <- "and adolescents who are vulnerable, in conflict/contact with the law and/or have special educaiton needs; (2)"
x[[17]][23] <- "institutions. The census results identified a special population of about 51,367 people who were institutional-"
x[[17]][24] <- "ized or whose status was floating and susceptible to harm due to forces outside of their control (vulnerable)."
x[[17]] <- x[[17]][c(1:35, 41:42)]

## page 18
x[[18]]     <- x[[18]][6:20]
x[[18]]     <- str_replace_all(string = x[[18]], pattern = "   ", replacement = "")
x[[18]][8]  <- "from 36 percent in 2008. However, although significant progress has been made to ensure that the BPHS is"
x[[18]]     <- x[[18]][c(1:9, 14:15)]

## page 19
x[[19]][7]  <- "supervised community health volunteers (CHVs) are in many cases the first provider of the community-based"
x[[19]][20] <- "sources, while some hospitals are too large for the populations they serve. The inefficiency in resource allocation"
x[[19]][21] <- "(human, material and financial) to the secondary level of service delivery undermines the ability to improve"
x[[19]][29] <- "almost 70 percent of the total workforce was either non-clinical or unskilled. Reflecting the variations in size"
x[[19]][30] <- "of catchment populations indicated in section 2.5, one-size-fits-all staffing patterns have resulted in under- and"
x[[19]][31] <- "over-staffing at facilities. Progress has been made toward increasing the number and quality of pre-service training"
x[[19]][33] <- "nurses), while shortages persist for other critical cadres (e.g. physicians, physician assistants and certified mid-"
x[[19]][34] <- "wives). Deployment to rural areas has been difficult because of the inflexibility of the salary scale and generally"
x[[19]][35] <- "inadequate incentives to retain skilled providers in remote areas. Thus, in addition to establishing flexible staffing"
x[[19]][40] <- "    The 2009 National Health Accounts Report (NHA) for fiscal year 2007-2008 reported a total health and"
x[[19]] <- x[[19]][c(1:41, 44:45)]

## page 20
x[[20]]     <- str_replace_all(string = x[[20]], pattern = "   ", replacement = "")
x[[20]][1]  <- "(OOP) financing accounted for most of the expenditure (47 and 35 percent, respectively). Government spending"
x[[20]][4]  <- "fiscal year 2006 to $25,767,030 in fiscal year 2009. While donor funds are expected to gradually decrease over"
x[[20]][13] <- "tions and irregularity of drug supply. Under-regulated private pharmacies are flourishing, despite the fact that"
x[[20]][14] <- "the quality of drugs being sold in them is  unreliable, and uncontrolled cross-border trafficking exacerbates this"
x[[20]][31] <- "tion and monitors the performance of the CHSWT. A county health officer heads the CHSWT and is responsible"
x[[20]][34] <- "responsibilities. Administrative capacity is increasing at teh county level and financial policies, procedures"
x[[20]][35] <- "and accountants have been assigned to each county, as have HR and M&E officers. However, the CHSWTs"
x[[20]]     <- x[[20]][c(1:40, 44:45)]

## page 21
x[[21]]     <- str_replace_all(string = x[[21]], pattern = "W%", replacement = "-")
x[[21]][3]  <- "proved quality, by increasing the efficiency and effectiveness of the system. Specific challenges to accomplishing"
x[[21]][12] <- "findings of a thorough assessment."
x[[21]][24] <- "capacity to assume an increasing financial burden necessitate increasing the equity and efficiency of"
x[[21]][28] <- "- Expected as well as unexpected developments must be identified and understood as they take place"

## page 22
x[[22]] <- str_replace_all(string = x[[22]], pattern = "W%", replacement = "-")
x[[22]] <- str_replace_all(string = x[[22]], pattern = "   ", replacement = "")

x[[22]][4]  <- "Mission    The mission of the Ministry of Health and Social Welfare is to reform and manage the sector to"
x[[22]][5]  <- "effectively and efficiently deliver comprehensive, quality health and social welfare services that"
x[[22]][7]  <- "Vision    Liberia's vision is a health population with social protection for all."
x[[22]][8]  <- "Goal    The goal is to improve the health and social welfare status of the population of Liberia on an"
x[[22]][11] <- "plishing the following objectives:"
x[[22]][21] <- "Health is a state of complete physical, mental and social well-being. The principles guiding this policy"
x[[22]][22] <- "are health and social welfare as a universal human right, equity, efficiency, sustainability and accountability."
x[[22]][28] <- "legislative branches of government are committed to investing adequate political capital, financial and human"

x[[22]] <- x[[22]][c(1:30, 34:35)]

## page 23
x[[23]][4]  <- "girls in particular will participate in the planning, design and implementation of programs that reflect the social,"
x[[23]][15] <- "3.2.4 Efficiency"
x[[23]][16] <- "    The greatest potential gains will be extracted from the inputs of all stakeholders in order to maximize effi-"
x[[23]][23] <- "    This policy promotes an approach that emphasizes the positive economic benefits of striking a balance"
x[[23]][27] <- "success. Cost ceilings considered affordable in the foreseeable fiscal framework will be the determining factor"
x[[23]][30] <- "    Adequate political, financial and administrative mechanisms are needed from the Government and all stake-"

## page 24
x[[24]]     <- str_replace_all(string = x[[24]], pattern = "   ", replacement = "")
x[[24]][4]  <- "ing disease, but it also includes essential care at the level closest to users, where they have first contact with"
x[[24]][19] <- "of service delivery. Officials at teh county level shall be responsible for service delivery and partner oversight,"
x[[24]][24] <- "Organizations (NGOs and FBOs), and Private-for-Profit (PFP) providers working in the health and social welfare"

## page 25
x[[25]]     <- str_replace_all(string = x[[25]], pattern = "W%", replacement = "-")
x[[25]][22] <- "agement, HMIS, financing, infrastructure and coordination;"

## page 26
x[[26]]     <- str_replace_all(string = x[[26]], pattern = "W%", replacement = "-")
x[[26]]     <- str_replace_all(string = x[[26]], pattern = "   ", replacement = "")
x[[26]][5]  <- "all financial management-related issues, including procurement, personnel and transport. Social Welfare co-"
x[[26]][8]  <- "services provided by other departments. Several program offices, for example the National Lishtimiasis and"
x[[26]][11] <- "functional unit to increase efficiency and reduce fragmentation of functions."
x[[26]][13] <- "that the number of departments be condensed and the number of politically appointed officials reduced."
x[[26]][21] <- "Health Officer (CHO) and other positions within the department will be equivalent to the CHSWT structure and"
x[[26]][26] <- "- Formulating country-specific plans for the achievement of county and national goals and targets;"
x[[26]][28] <- "ensure that they are readily accessible, high quality, efficient and responsive to the population's needs;"

## page 27
x[[27]][1]  <- "health districts under the responsibility of the CHSWT; health districts constitute a different geographical terri-"
x[[27]][3]  <- "are required), health facilities and communities to fulfill their role in the service delivery system. Specific"
x[[27]][5]  <- "administrative framework for decentralization is finalized and enforced."
x[[27]][13] <- "aged and supported with resources. Specific referral procedures will be formulated by the Ministry to guide care"
x[[27]][1] <- "health districts under the responsibility of the CHSWT; health districts constitute a different geographical terri-"

x[[27]] <- x[[27]][c(1:34, 37:38)]

## page 28
x[[28]]     <- str_replace_all(string = x[[28]], pattern = "W%", replacement = "-")
x[[28]][6]  <- "- Community-based services: Within the radius of a PHC facility catchment population (equivalent to"
x[[28]][11] <- "- Non-facility-based SDPs: These may take different forms (e.g. mobile clinics or community-based"
x[[28]][15] <- "- Clinics: The most basic public sector health facility is the clinic. It may take many forms and sizes and"
x[[28]][40] <- "sufficient to ensure the permanent provision of Comprehensive Emergency Obstetrics and Neo-natal"
x[[28]][41] <- "Care. Bed capacity will reflect the size of the catchment population, but on average it should be about"

## page 29
x[[29]]     <- str_replace_all(string = x[[29]], pattern = "W%", replacement = "-")
x[[29]][24] <- "    The EPHS prioritizes services that reflect the prevailing disease burden and health conditions affecting the"

## page 30
x[[30]][1]  <- "both packages of services will be provided in flexible ways to respond to local conditions in order to obtain"
x[[30]][3]  <- "service delivery points will reflect distance, utilization rates and size and density of the catchment populations"
x[[30]][6]  <- "4.4 Health and social welfare financing"
x[[30]][8]  <- "  The Government of Liberia is committed to financing health and social welfare at the highest level possible."
x[[30]][10] <- "ing that typically occurs after a post-conflict spike in funding and an already high out-of-pocket expenditure,"
x[[30]][11] <- "the total health and social welfare expenditure is unlikely to significantly increase in relative terms during the"
x[[30]][13] <- "term sustainability of financing for health and social welfare, a National Health and Social Welfare Financing"
x[[30]][15] <- "of Government financing, predictable donor support, affordable user fees for certain services and potential"
x[[30]][22] <- "when possible. Donors will be encouraged to use more predictable and efficient ways of channeling their sup-"
x[[30]][25] <- "within a sector budget and medium-term expenditure framework, based on the findings of a costing exercise"
x[[30]][32] <- "the MOHSW, be administered by the CHSWTs and be subject to the Ministry's procedures for financial manage-"
x[[30]][34] <- "schemes will be explored, such as community-based financing and social insurance, with attention to the pro-"
x[[30]][36] <- "be gradually scaled up to attain maximum benefit. Because it wil take time to implement strategies for health"
x[[30]][37] <- "and social welfare financing, the current suspension of user fees shall be extended until at least 2013, except"
x[[30]][38] <- "in cases of approved pilot activities for the purposes of exploring the feasibility of financing options. Because"

## page 31
x[[31]][6]  <- "based on criteria established by the central MOHSW. At a minimum, all financial support to health and social"
x[[31]][12] <- "mechanisms such as performance-based contracting and provider payment schemes to increase efficiency. An"
x[[31]][16] <- "of resources for each county as well as increments that reflect variations in population, density and geographic"
x[[31]][27] <- "Deployment, benefit and remuneration packages will be established by the Ministry to increase motivation,"
x[[31]][29] <- "necessary. The MOHSW shall formulate optimal staffing criteria with multiple increments according to the"
x[[31]][31] <- "under-staffing at facilities. Within the resource ceilings assigned by the MOHSW, CHSWTs shall assign skilled"
x[[31]][39] <- "health professionals shall be used to close the workforce gap for priority clinical skills as quickly and efficiently"

## page 32
x[[32]][2]  <- "existing professional profiles or creating new categories of"
x[[32]][17] <- "social welfare staffing challenges as part of the human re-"
x[[32]][28] <- "Welfare Policy and Plan with sufficient detail to accmplish the long-term strengthening and management needs"
x[[32]][38] <- "efficient facility distribution. This will allow for incremental variances in facility design based on the services to"

## page 33
x[[33]][1]  <- "expensive, one-size-fits-all facility prototypes shall be discontinued. Privately-owned facilities wil gradually be"
x[[33]][12] <- "the infrastructure network will be planned as a coherent whole, within country and county financial ceilings"
x[[33]][19] <- "to specific needs, building codes for construction, regular quality control monitoring and pre-occupancy ap-"
x[[33]][30] <- "ment. The Information Technology network will be strengthened to enhance efficiency in storing and transmit-"
x[[33]][33] <- "human resources, financial management, facility inventory and epidemiological information."
x[[33]][36] <- "The MOHSW will ensure access to efficacious, high-quality, safe and affordable medicines for all people in"
x[[33]][37] <- "Liberia. To accomplish this, the Ministry will revise the National Drug Policy to reflect the priorities established"
x[[33]][38] <- "in this policy. In the drug policy, the functions of financing, regulating, selecting, quantifying, procuring, distrib-"

## page 34
x[[34]][3]  <- "Resources Plan will reflect the human resource requirements of the National Drug Policy in terms of the number"
x[[34]][7]  <- "Treatment Guidelines will be revised to reflect the Essential Package of Health Services and teh National Drug"
x[[34]][12] <- "The Supply Chain Master Plan and Supply Chain Standard Operating Procedures guide quantification, pro-"
x[[34]][13] <- "curement, financing, storage and distribution of drugs and materials. Based upon compiled facility and county"
x[[34]][14] <- "consumption and morbidity reports, the MOHSW will be responsible for the quanitification of pharmaceutical"
x[[34]][18] <- "adopt national procurement and financial management systems."
x[[34]][38] <- "organizational framework for certification and delivery of improved"
x[[34]][41] <- "whole sector benefits from the contributions of all programs."

## page 35
x[[35]][4]  <- "include United Nations agencies, not-for-profits and other government agencies, particular attention will be given to"
x[[35]][24] <- "Ministry will develop specific environmental health guidelines for communities as well as health facilities. The"
x[[35]][28] <- "Faith-based and non-governmental organizations (Not-for-Profits, NFPs) and private health and social wel-"
x[[35]][29] <- "fare service providers (Private-for-Profits, PFPs) will continue to be major contributors to the health and social"
x[[35]][30] <- "welfare delivery system. Because relationships gain in transparency, efficiency and effectiveness when they"
x[[35]][32] <- "and social social welfare services. In the initial three to five years of implementing this policy, performance-based"

## page 36
x[[36]]     <- str_replace_all(string = x[[36]], pattern = "W%", replacement = "-")
x[[36]]     <- str_replace_all(string = x[[36]], pattern = "   ", replacement = "")

x[[36]][21] <- "adopted across the whole health and social welfare sector."
x[[36]][25] <- "nate and increase the efficiency of donor assistance."
x[[36]][35] <- "knowledge and influencing positive health and social welfare behaviors within families."

## page 37
x[[37]] <- str_replace_all(string = x[[37]], pattern = "W%", replacement = "-")
x[[37]][3]  <- "services. To achieve this and ensure coordination of research activities, the MOHSWwill first ensure that the"
x[[37]][20] <- "will find effective ways to identify and hire professionals with appropriate expertise and to use them effectively."
x[[37]][20] <- "will find effective ways to identify and hire professionals with appropriate expertise and to use them effectively."
x[[37]][31] <- "and sanctions, flexibility and innovation."

## page 38
x[[38]]     <- str_replace_all(string = x[[38]], pattern = "W%", replacement = "-")
x[[38]]     <- str_replace_all(string = x[[38]], pattern = "   ", replacement = "")
x[[38]][14] <- "and maintain a simple, coherent, scientifically sound and easily understandable overall information system for"
x[[38]][18] <- "ficiency, decentralization and adherence to the primary health care approach. The national HMIS will consist"
x[[38]][29] <- "officials in charge of different levels of care must rely on data appropriate to their level of decision-making"

x[[38]][1]<- paste(x[[38]][1], x[[38]][2], sep = " ")
x[[38]] <- x[[38]][-2]

## page 39
x[[39]][1]  <- "provided data. Routine information will be complemented and validated by a limited number of field surveys,"
x[[39]][3]  <- "shed light on those components and issues not adequately reflected by routine information systems. The type of"
x[[39]][4]  <- "surveys carried out will reflect the need for information at the various levels, including the primary, secondary"
x[[39]][9]  <- "of efficiency, effectiveness and equity in service delivery and trends. Progress and constraints shall be regularly"
x[[39]][10] <- "communicated to the public. Specific new components will be addedif considered necessary. Imbalances and"
x[[39]][14] <- "plans for the following year. The Ministry expects to conduct the next major policy review in three to five years."

## page 40
x[[40]] <- str_replace_all(string = x[[40]], pattern = "   ", replacement = "")
x[[40]][12] <- "lishing adequate, independent regulatory capacity within the sector. The Ministry's Office of General Council"
x[[40]][18] <- "service delivery dutiesin order to avoid conflicts of interest. A phased approach will be used to progressively"
x[[40]][20] <- "Monrovia. In the next three to five years, efforts will focus on the following selected areas:"
x[[40]][24] <- "elements include minimum investment, equipment requirements, staffing qualifications, licensure and accred-"
x[[40]][26] <- "public for profit, the professional boards willl develop appropriate regulations for the private sector and evaluate"
x[[40]][32] <- "specified time period to avoid being downgraded, having their licenses revoked or closed down. Public subsidies"


## page 41
x[[41]][5]  <- "professional bodies in fulfilling their functions in this area. These functions will include informing the public"
x[[41]][11] <- "technical efficiency and professionalism, starting with the largest facilities."
x[[41]][16] <- "the legal aspects of health and social welfare service provision. The Ministry will advise officials on proper"


## page 42
x[[42]]     <- str_replace_all(string = x[[42]], pattern = "W%", replacement = "-")
x[[42]]     <- str_replace_all(string = x[[42]], pattern = "   ", replacement = "")
x[[42]][22] <- "a significant reallocation of resources within it"
x[[42]][25] <- "- The resources available are less than anticipated to implement this policy and increased efficiency"

## page 43
x[[43]]     <- str_replace_all(string = x[[43]], pattern = "W%", replacement = "-")
x[[43]][3]  <- "when they must be accomplished. The most urgent issues that must be accomplished within the first two years"
x[[43]][8]  <- "out and hospital services rationalized in accordance with the findings of the assessment."
x[[43]][12] <- "- The National Infrastructure Policy must be finalized to inform the sector budgeting process and ac-"
x[[43]][15] <- "tial alternative financing schemes, including insurance, user fees and hypothecated taxes necessary"
x[[43]][16] <- "to finance the sector."
x[[43]][20] <- "- The National Health Sector Decentralization Policy will be finalized and be aligned to the national"


policy <- NULL

for(i in 11:43) {
  #
  # extract text from current page
  #
  temp <- tibble(text = x[[i]], page = rep(i, length(x[[i]])))
  #
  # remove page number
  #
  temp <- temp[-(nrow(temp) - 1), ]
  #
  # Concatenate policy
  #
  policy <- rbind(policy, temp)
}
#
# add linenumber and chapters
#
policy <- mutate(.data = policy,
                 linenumber = row_number(),
                 section = cumsum(str_detect(text,
                                             regex("^\\d[[:punct:]]\\s",
                                                   ignore_case = TRUE))))

healthPolicy2011 <- policy
usethis::use_data(healthPolicy2011, overwrite = TRUE)

################################################################################

x <- pdf_text(pdf = "data-raw/documents/natHealthPolicyPlan2011.pdf")
x <- str_split(x, pattern = "\n")

## page 51
x[[51]]     <- str_remove_all(string = x[[51]], pattern = "[[:blank:]]{2,}")
x[[51]][2]  <- paste(x[[51]][2], x[[51]][3], sep = "")
x[[51]][5]  <- "has benefited from active participation of the counties, therefore reflecting ample consensus across the"
x[[51]][11] <- "    These objectives will be reached by applying the principles of equity, efficiency, accountability and sustain-"
x[[51]][24] <- "resources will increase even more, to exceed 15,000. As a reflection of the complexity of the projected network,"
x[[51]][36] <- "services will be provided by partners through performance-based contracts to ensure efficiency and quality. The"
x[[51]][38] <- "Regarding the health financing, the MOHSW will increase resource mobilization and predictability by improv-"
x[[51]][40] <- "alternative financial sources, such as pre-payment (health insurance) schemes and user fees. Equity and efficiency"
x[[51]]     <- x[[51]][-3]

## page 52
x[[52]]     <- str_remove_all(string = x[[52]], pattern = "[[:blank:]]{2,}")
x[[52]][3]  <- "10-year investment plan. The MOHSW will define building standards and design a transparent project process."
x[[52]][19] <- "will be prepared, to ensure all county teams are endowed with sufficient capacitiesto manage decentralized"
x[[52]][21] <- "Sector coordination will be based on transparency, accountability and efficiency. Common planning and"
x[[52]][22] <- "financing mechanisms will be strengthened. International implementing partners will be gradually replaced by"
x[[52]][25] <- "three phases. The first three years will be devoted to develop the many plans and pilots that will shape service"
x[[52]][27] <- "and implementation will start of sub-sector plans. After a medium-term revision in in the fifth year, the remaining"

## page 53
x[[53]][4]  <- "started in September 2010. In the first stage, a roadmap for the exercise as a whole was adopted and the Country"
x[[53]][9]  <- "year National Healtha nd Social Welfare Plan. The final stage involved the finalization and submission of the"
x[[53]][13] <- "the production of 10-Year County Health and Social Welfare Plans, a summary of which is attached to the final"
x[[53]][14] <- "version of this document. The definitive targets will be a balance between those that are normative, those that"
x[[53]][15] <- "are central MOHSW-defined, and those proposed by teh CHSWT."

x[[53]][1]  <- paste(x[[53]][1], x[[53]][2], sep = " ")
x[[53]] <- x[[53]][-2]

## page 54
x[[54]]     <- str_remove_all(string = x[[54]], pattern = "[[:blank:]]{2,}")
x[[54]][8]  <- "cides with the organizational structure of the MOHSW. These building blocks are collectively called Systemic"
x[[54]][11] <- "The third element of the plan framework is defined by the relations established among all health sector ac-"
x[[54]][12] <- "tors, domesticand international, providers, users and financers, private and governmental."
x[[54]][14] <- "achieve the health system's goals of improved health status, responsiveness and financial protection."

x[[54]] <- x[[54]][c(1:14, 36:37)]

## page 55
x[[55]]     <- str_replace_all(string = x[[55]], pattern = "W%", replacement = "-")
x[[55]][4]  <- "efficiently deliver comprehensive, quality health and social welfare services that are equitable, accessible and"
x[[55]][24] <- "financial network"

## page 56
x[[56]]     <- str_remove_all(string = x[[56]], pattern = "[[:blank:]]{2,}")
x[[56]]     <- str_replace_all(string = x[[56]], pattern = "W%", replacement = "-")
x[[56]][12] <- "- Community-based volunteers are expected to promote good health practices, provide first aid for se-"
x[[56]][14] <- "(TTMs), General Community Health Volunteers (gCHVs) and the newly defined Household Health"
x[[56]][18] <- "outpatient components, excluding birth attendance. SDPs have defined catchment populations and"
x[[56]][29] <- "- The secondary level is composed of the first and second tiers of referral, health centers and hospitals."
x[[56]][31] <- "care (up to 40 beds) and laboratory for catchment populations of 25,000 to 40,000 beneficiaries. HCs"
x[[56]][33] <- "care, their inpatient capacity makes them a first referral unit. Where catchment population, network of"

## page 57
x[[57]]     <- str_replace_all(string = x[[57]], pattern = "W%", replacement = "-")
x[[57]][37] <- "If individual health facilities provide care according to their appropriate levels, none will be sufficient by"
x[[57]][39] <- "systems, territorially based and with defined management responsibilities, becoming sub-national health systems,"

x[[57]] <- x[[57]][c(1:18, 37:45)]

## page 58
x[[58]]     <- str_replace_all(string = x[[58]], pattern = "W%", replacement = "-")
x[[58]][14] <- "- The National Health System does not have a defining facility, since regional and national hospitals play"
x[[58]][17] <- "Within the context of decentralization, the MOHSW will define in detail the managerial responsibilities of each"
x[[58]][19] <- "not to mention what access each level will have to resources, including financial ones."
x[[58]][27] <- "ficiency and quality:"
x[[58]][33] <- "New services will be phased-in incrementally, in five additional areas: Environmental and Occupational"

## page 59
x[[59]]     <- str_replace_all(string = x[[59]], pattern = "W%", replacement = "-")
x[[59]][3]  <- "and fistual services"
x[[59]][8]  <- "children under five and pregnant women. Objectives are set up to 2015, when they will be reviewed,"
x[[59]][13] <- "among vulnerable groups such as pregnant women and children under five, to 80 percent by 31st"
x[[59]][16] <- "40 percent in 2010 and 2011 and to scale upto full coverage by 2015 (after evaluation of the first"
x[[59]][31] <- "- To improve case notification of new smear positive TB cases from 103 per 100,000 in 2010 to 127"

## page 60
x[[60]][1]  <- "4.1.2.1 Taking service provision closer to the population"
x[[60]][2]  <- "The MOHSW will expand the network of pub-"
x[[60]][3]  <- "lic facilities with the establishment of new SDPs in"
x[[60]][4]  <- "communities presently underserved. Potential loca-"
x[[60]][5]  <- "tions and SDP types were identified during County"
x[[60]][6]  <- "Planning Exercises, based on community size and"
x[[60]][7]  <- "distance to existing facilities."
x[[60]][8]  <- "In total, the counties identified 231 locations"
x[[60]][9]  <- "where a new SDP should be operated (Table 1),"
x[[60]][10] <- "producing a network growth close to 50 percent."
x[[60]][11] <- "According to the country teams, 150 should be per-"
x[[60]][12] <- "manent facilities and 81 non-facility-based services."
x[[60]][13] <- "The identification of sites for new SDPs was carried"
x[[60]][14] <- "out separately in each county. As a result, the level"
x[[60]][15] <- "of priority may not be directly comparable. More"
x[[60]][16] <- "detailed exercises, coinciding with the elaboration"
x[[60]][17] <- "of operational plans and the actual budget alloca-"
x[[60]][18] <- "tion, will shape the rhythm of implementation by"
x[[60]][19] <- "county."
x[[60]][20] <- "4.1.2.2 Reinforcing existing EPHS"
x[[60]][21] <- "components"
x[[60]][22] <- "    The Essential Package of Health Services is com-"
x[[60]][23] <- "posed of a primary package of eleven service deliv-"
x[[60]][24] <- "ery areas, a secondary package of hospital services"
x[[60]][25] <- "and five priority support systems. A summary of the main strategies in each of the component areas is presented"
x[[60]][40] <- "that pregnant somen who attend first ANC continue up to at least the fourth ANC. PMTCT"

x[[60]] <- x[[60]][c(1:25, 36:50, 54:55)]

## page 61
x[[61]][1]  <- "4. Postpartum Care. At least two post-partum visits for new mothers within first six weeks"
x[[61]][15] <- "In hospital outpatient clinics, priority will be given to referred patients and those identified"
x[[61]][22] <- "4. Infant and Young Child Feeding"
x[[61]][26] <- "6. Micronutrient Supplementation"
x[[61]][39] <- "4. Obstetric Fistula"


## page 62
x[[62]][26] <- "monary resuscitation (CPR) and early referral. Specific capacity to manage emergencies will be deployed"
x[[62]][31] <- "identification of NCDs and routine blood pressure (BP) measurement will be introduced. A nationwide sur-"
x[[62]][36] <- "filariasis, schistosomiasis, onchocerciasis or soil-transmitted helminthes. Primary health providers will be"

## page 63
x[[63]]     <- str_replace_all(string = x[[63]], pattern = "W%", replacement = "-")
x[[63]][20] <- "    In addition to the PHC-focused packaged described above, and with the same criteria of efficiency and"
x[[63]][29] <- "- Define staffing, equipment, medical supply and diagnostic needs and services"
x[[63]][30] <- "- Give guidance on the content of training programs by defining the technical and management com-"
x[[63]][36] <- "the existing and projected service utilization and the efficiency targets in resource use."

## page 64
x[[64]] <- str_replace_all(string = x[[64]], pattern = "W%", replacement = "-")

## page 65
x[[65]][5]  <- "effective and efficient implementation of infection prevention activities. Equipment, supplies and facilities/"
x[[65]][9]  <- "The waste management policy establishes guidelines for waste minimization, separation, identification,"
x[[65]][10] <- "handling, treatment and final disposal. National standard operational guidelines for waste management"
x[[65]][22] <- "and Plan. This is an essential part of an effective public health system as defined in documents such as"
x[[65]][36] <- "surveillance officers will carry out death audits within 48 hours, both at communities and health facilities."

## page 66
x[[66]] <- str_replace_all(string = x[[66]], pattern = "W%", replacement = "-")
x[[66]][19] <- "will play a significant role in identifying potential gCHVs for training, providing support for health-related activi-"
x[[66]][30] <- "   Lifestyle choices and socio-economic, religious, cultural and environmental factors have significantly contrib-"

## page 67
x[[67]]     <- str_replace_all(string = x[[67]], pattern = "W%", replacement = "-")
x[[67]][3]  <- "- Intensifying the campaign for the use of the health life logo on message and materials for health"
x[[67]][31] <- "    A set of targets will be defined for the most important health services. The MOHSW has proposed targets on"
x[[67]][32] <- "selected services, which will be adjusted to the counties' projected capacity. A definitive table will be produced"

## page 68
x[[68]]     <- str_replace_all(string = x[[68]], pattern = "W%", replacement = "-")
x[[68]][18] <- "- Services currently provided and those added in the first phase will be continued."
x[[68]][22] <- "    The 2021 network of public facilities will be the result of building new clinics (SDP as identified by the"
x[[68]][32] <- "placed facility or efficient outreach services."

## page 69
x[[69]] <- x[[69]][21:38]

## page 70
x[[70]]     <- str_replace_all(string = x[[70]], pattern = "W%", replacement = "-")
x[[70]][39] <- "    A residual effect of years of civil conflict is a societal mistrust and the collapse of a family responsibility system"

## page 71
x[[71]][36] <- "delivery points. These committees will help find durable solutions to local social problems. Furthermore, and"
x[[71]][38] <- "egies as right-holders (actively participating in efforts to define the way forward, as is crucial in a developmental"
x[[71]] <- x[[71]][35:41]

## page 72
x[[72]]     <- str_replace_all(string = x[[72]], pattern = "W%", replacement = "-")
x[[72]][4]  <- "Social Welfare Officer, under the umbrella of the Community Services Director of the CHSWT. While emphasis"
x[[72]][17] <- "about actual needs and the possibilities of using innovative financing schemes."
x[[72]][18] <- "- Assessment and design of pilot tax-financed social insurance scheme"
x[[72]][21] <- "- Baseline assessment on scale and scope of human trafficking"
x[[72]][25] <- "- Training institutions' assessment and curriculum modification for social workers"
x[[72]][39] <- "During this time, dependency on partners should have significantly decreased and most partner assistance"

## page 73
x[[73]][5]  <- "     This material has sections on financing, network of facilities, infrastructure and SDP, human resources, drugs"
x[[73]][9]  <- "5.1 Health and social welfare financing"
x[[73]][10] <- "    The goal of health and social welfare financing is to ensure that the services provided to the population of Liberia"
x[[73]][13] <- "level of government financing, predictable donor support and affordable user fees for certain services. Alternative"
x[[73]][14] <- "pre-payment schemes will be explored. Allocative efficiency and equity will be obtained through the use of"
x[[73]][16] <- "based financing mechanisms."
x[[73]][18] <- "5.1.1 Increase mobilization and predictability of financial resources for health"
x[[73]][23] <- "Conduct a study to assess the viability of additional financing mechansims, including hypothecated taxes"
x[[73]][32] <- "beneficiaries to enroll in pre-payment schemes."
x[[73]][34] <- "diture frameworks. Specific issues to consider are forecasting personnel and capital expenditure, as well"

## page 74
x[[74]][2]  <- "for cash-flow problems, accounting problems and even planning problems. The whole budget execution"
x[[74]][9]  <- "existing network; both may be related to population. The different allocation processes will be identified"
x[[74]][13] <- "classifications, and encourage pooling and harmonization."
x[[74]][15] <- "will try to integrate financial management procedures in the following order:"
x[[74]][25] <- "MTEF where priorities are discussed, resources identified and projected and allocation decided with a"
x[[74]][26] <- "three- to five-year horizon."
x[[74]][27] <- "5.1.3 Increase efficiency of resource utilization"
x[[74]][29] <- "sector, including in planning, budgeting, purchasing and financial management, along with the strategies"
x[[74]][36] <- "Strengthen MOHSW capacity for strategic budgeting and public finance management."

## page 75
x[[75]][1]  <- "5.1.4 Increase efficiency and equity through a harmonized provider payment mechanism"
x[[75]][11] <- "will be identified as settings of contractual arrangements to give targets a territorial, population and"
x[[75]][17] <- "Strengthen financial management systems to integrate financial information from all sources - donors"
x[[75]][20] <- "Expenditure Reviews and Benefits Incidence Analysis. To this end, arrangements will be made with LISGIS"
x[[75]][24] <- "health infrastructure through the development of Health Infrastructure Standards and to increase the efficiency"
x[[75]][28] <- "5.2.1 To improve access to well-maintained health and social welfare facilities of sufficient size,"
x[[75]][37] <- "potential efficiency, continuity of care, referral system comprehensiveness). The CHSWT identified 124"

## page 76
x[[76]]     <- str_replace_all(string = x[[76]], pattern = "W%", replacement = "-")
x[[76]][6]  <- "- The MOHSW will remain responsible for planning and financing interventions on hospitals, some of"
x[[76]][24] <- "minimum acceptable construction techniques, material and built-in equipment specifications and others."
x[[76]][29] <- "Specific technical alternatives will be offered for:"
x[[76]]     <- x[[76]][c(1:36, 40:41)]

## page 77
x[[77]][3]  <- "specific sites and project needs, regular quality control monitoring during construction and pre-occupancy"
x[[77]][18] <- "5.3.1 Increase the number of equitably distributed qualified and high performing workers at all lev-"
x[[77]][24] <- "Review and update staffing norms for each type of facility in line with the sector's service delivery priori-"
x[[77]][33] <- "Developing and implementing differential competitive benefit packages geared to hard-to-reach areas, in-"
x[[77]][36] <- "may prove difficult; on the other hand, it may ensure that some critical staff (e.g. anaesthetists, physicians,"

## page 78
x[[78]][1]  <- "For staff trained with the financial support of the MOHSW, compulsory service in hardship areas for a"
x[[78]][4]  <- "Based on the Workload Indicators for Staffing Needs (WISN) and Task Analysis methodologies, workload"
x[[78]][12] <- "Performance-related incentives will be developed, in the form of financial awards, career progression"
x[[78]][14] <- "incentives will be awarded by the CHSWT, while scholarships for masters degrees will be granted by the"
x[[78]][31] <- "of origin) by implementing the right mix of regulation, scholarships and direct financing to the relevant"
x[[78]][35] <- "county health officers. In the absence of a body of professional managers, selected officers will be trained"
x[[78]][40] <- "new knowledge, skills and good practices, meet service needs and consist of a significant part of non-"

## page 79
x[[79]][6]  <- "and financially, the establishment and functioning of professional bodies. Standard operating procedures"
x[[79]][14] <- "PA or midwife to be deployed in remote facilities), as well as the transmission of new, specific capacities."
x[[79]][23] <- "during official working hours without written permission from their immediate supervisors."
x[[79]][35] <- "    The MOHSW shall ensure access to efficacious, high-quality, safe and affordable medicines for all people"
x[[79]][36] <- "in Liberia. The functions of financing, regulating, selecting, quantifying, procuring, distributing and storing,"

## page 80
x[[80]][8]  <- "Vital, Essential and Non-Essential (VEN) classifications"
x[[80]][12] <- "sector drugs supply, including quantification of needs and procurement planning, as well as managing"
x[[80]][17] <- "of the unified MOHSW Procurement Unit."
x[[80]][27] <- "Explore all alternatives for drug financing. While most funding for drug supply will come from regular"
x[[80]][29] <- "with reportedly good results. This approach will be explored, and eventually tested, for specific items in"
x[[80]][31] <- "Private sector financing through increase in public-private partnerships for procurement of approved qual-"
x[[80]][33] <- "financing schemes."
x[[80]][40] <-  "ing force influencing the selection, procurement, distribution and use of essential medicines, they need to"
x[[80]][41] <- "become the budget holders. To promote equity and efficiency, drug budget allocation will be part of a general"

## page 81
x[[81]][4]  <- "Besides technical adequacy, revised guidelines will take into account efficiency and cost-containment,"
x[[81]][14] <- "    The MOHSW will maintain a simple, coherent, scientifically sound and easily understandable information"
x[[81]][17] <- "composed of databases on integrated financial management, human resources, physical assets and management,"
x[[81]][30] <- "working group will be set up, with partners' collaboration, to establish the definitive monitoring frame-"
x[[81]][34] <- "will be harmonized so that the data requirements of each stakeholder are satisfied and the data elements"

## page 82
x[[82]][4]  <- "Complete the HMIS databases with information on pharmacy matters, human resources and finances."
x[[82]][11] <- "to the concerned program. Additionally, maps on all indicators as specified in the strategy will be made"
x[[82]][23] <- "finance, physical assets, infrastructure) will be developed using the appropriate software. Hardware re-"

## page 83
x[[83]][7]  <- "The MOHSW will make sure that sufficient equipment is available for the correct realization of duties"
x[[83]][12] <- "    The MOHSW will increase effectiveness and efficiency of procurement by harmonizing and coordinating"
x[[83]][15] <- "5.6.1.1 Increase effectiveness and efficiency of procurement activities"
x[[83]][20] <- "Establish a unified MOHSW Procurement Unit. In the medium term, all MOHSW procurement will be"
x[[83]][24] <- "healthcare facilities and related projects; vehicles and other transportation items; office and information"

## page 84
x[[84]][16] <- "suring effective and efficient implementation of infection prevention activities at each facility, following"
x[[84]][37] <- "tions involved in defining and monitoring standards of practice."

## page 85
x[[85]]     <- str_replace_all(string = x[[85]], pattern = "W%", replacement = "-")
x[[85]][3]  <- "developed and implemented, with tools and events and involving all financers and providers and both central"
x[[85]][4]  <- "and country level. Guidelineswill be designed to fullfil the planning cycle components, from situational analysis,"
x[[85]][24] <- "- Beneficiaries and the population at large will be updated on the expected changes in the way they relate"
x[[85]][31] <- "and they include health financing, health care-seeking behavior, and health systems organization, among oth-"
x[[85]][35] <- "demic outbreaks. Active participation on the preparedness and response to man-made disasters, such as inflow"
x[[85]][39] <- "lines and SOPs will be adapted to the Liberian situation. During emergencies, specifically when displacement"

## page 86
x[[86]] <- str_replace_all(string = x[[86]], pattern = "W%", replacement = "-")
x[[86]][2]  <- "necessary and appropriate, adapted guidelines will define the use of such expertise during emergencies. County"
x[[86]][9]  <- "sponsibility to district health officers as district government is progressively established. Caution will be exerted"
x[[86]][14] <- "This strategy will focus on creating the local capabilities of County managers to run efficiently and ef-"
x[[86]][22] <- "- The MOHSW will remain the main repository of functions related to policy making, regulation, fi-"
x[[86]][33] <- "pacities of the fifteen CHSWTs by transferring technical and financial capabilities to them and be devel-"
x[[86]][38] <- "ization policy, a reform process will be needed to make it more effective and efficient to respond to the"

## page 87
x[[87]][7]    <- "Analyze specifically the split purchaser/provider scheme of health system. Devolved health systems"
x[[87]][[22]] <- "revisions and modifications during the process from de-concentrationto devolution. In the meantime,"
x[[87]][28]   <- "districts will be in need of a specific health management institution. These functions may be linked to"
x[[87]] <- x[[87]][c(1:29, 35:36)]

## page 88
x[[88]][2]  <- "Increasing effectiveness and efficiency of collaboration among partners will be obtained by enhancing coor-"
x[[88]][5]  <- "6.1 Improving efficiency and effectiveness through donor coordination"
x[[88]][8]  <- "resource envelope is identified, priorities agreed upon, and resource allocation (by level, by county) decided."
x[[88]][18] <- "    The HMIS will be modified to accommodate financial information relevant to producing the necessary in-"
x[[88]][19] <- "dicators of availability, equity and efficiency. Data collecting and analyzing tools will consider the complexity"
x[[88]][24] <- "primary catchment areas. This management responsibility will include collaboration with not-for-profit (NFP)"
x[[88]][25] <- "and private-for-profit (PFP) facilities to play similar roles as public facilities with a designated primary catchment"
x[[88]][26] <- str_replace(string = x[[88]][26], pattern = ".5", replacement = ".")

## page 89
x[[89]]

## page 90
x[[90]]
x[[90]][4] <- "NFP facilities. Actual figures, to be reviewed later in the process, are likely to be higher"
x[[90]][6] <- "conservative 5 percent annual inflation rate is applied (the result being the actual money necessary every year),"

## page 92
x[[92]][16] <- "ommendations emanating from the assessments performed during the first phase."
x[[92]][17] <- "    After the fifth year of implementation, a standard medium-term evaluation will be completed and the plan"
x[[92]][18] <- "targets and strategies for the final period reviewed."
x[[92]][20] <- "estimated baselines and targets that reflect the plan's main goals. Thus, the framework includes impact indica-"
x[[92]][21] <- "tors such as those on health-related Millenium Development Goals (MDGs). Other indicators reflect the wider"
x[[92]][22] <- "health system's goals of access, equity and responsiveness and financial protection. The remaining indicators,"
x[[92]][23] <- "most of which can be calculated at county level, reflect the system's performance, in service provision, in the"
x[[92]][29] <- "fication has the risk that under-reporting is currently commonplace. However, it has the advantage that county"


plan <- NULL

for(i in c(51:90, 92)) {
  #
  # extract text from current page
  #
  temp <- tibble(text = x[[i]], page = rep(i, length(x[[i]])))
  #
  # remove page number
  #
  temp <- temp[-(nrow(temp) - 1), ]
  #
  # Concatenate policy
  #
  plan <- rbind(plan, temp)
}
#
# add linenumber and chapters
#
plan <- mutate(.data = plan,
               linenumber = row_number())

plan$section <- NA
plan$section[plan$page %in% 51:51] <- 0
plan$section[plan$page == 53] <- 1
plan$section[plan$page == 54] <- 2
plan$section[plan$page == 55] <- 3
plan$section[plan$page %in% 56:72] <- 4
plan$section[plan$page %in% 73:87] <- 5
plan$section[plan$page %in% 88:89] <- 6
plan$section[plan$page %in% 90:91] <- 7
plan$section[plan$page == 92] <- 8

healthPlan2011 <- plan
usethis::use_data(healthPlan2011, overwrite = TRUE)


################################################################################

## Extract tables from the health plan
require(tabulizer)

options(stringsAsFactors = FALSE)

tab1 <- extract_tables(file = "data-raw/documents/natHealthPolicyPlan2011.pdf",
                       pages = 60,
                       method = "decide")

tab1 <- tab1[[1]]

tab1 <- tab1[3:17, 1:3]

tab1[1, 1]    <- "Bomi"
tab1[1, 2:3]  <- c(4, 2)
tab1[2, 2:3]  <- c(12, 15)
tab1[3, 2:3]  <- c(20, 0)
tab1[4, 2:3]  <- c(4, 0)
tab1[5, 2:3]  <- c(6, 19)
tab1[6, 2:3]  <- c(13, 0)
tab1[7, 2:3]  <- c(4, 0)
tab1[8, 2:3]  <- c(13, 8)
tab1[9, 2:3]  <- c(3, 6)
tab1[10, 2:3] <- c(12, 9)
tab1[11, 2:3] <- c(3, 4)
tab1[12, 2:3] <- c(27, 14)
tab1[13, 2:3] <- c(19, 4)
tab1[14, 2:3] <- c(5, 0)
tab1[15, 2:3] <- c(5, 0)

tab1 <- data.frame(tab1)

tab1[ , 2] <- as.numeric(tab1[ , 2])
tab1[ , 3] <- as.numeric(tab1[ , 3])

names(tab1) <- c("county", "facility", "nonFacility")

healthPlan2011Table1 <- tab1
usethis::use_data(healthPlan2011Table1, overwrite = TRUE)

################################################################################

tab2 <- extract_tables(file = "data-raw/documents/natHealthPolicyPlan2011.pdf",
                       pages = 69,
                       method = "decide")

tab2 <- tab2[[1]][4:18, ]

ch <- str_split_fixed(string = tab2[, 4], pattern = " ", n = 3)[ , 1]
ch[14] <- 0

hc <- str_split_fixed(string = tab2[, 4], pattern = " ", n = 3)[ , 2]
hc[c(1:4, 13, 15)] <- 0

clinic <- c(str_split_fixed(string = tab2[, 4], pattern = " ", n = 3)[1:4, 2],
            str_split_fixed(string = tab2[ , 4], pattern = " ", n = 3)[5:12, 3],
            str_split_fixed(string = tab2[, 4], pattern = " ", n = 3)[13:15, 2])

xx <- str_split_fixed(string = str_pad(string = tab2[ , 6],
                                       width = 10,
                                       side = "left",
                                       pad = " "),
                      pattern = " ",
                      n = 5)

xx[4, 1]  <- 1
xx[4, 2]  <- 0
xx[10, 1] <- 1
xx[10, 2] <- 0

tab2 <- data.frame(tab2[ , 1:3], ch, hc, clinic, xx[ , 1:4])
tab2$X3 <- ifelse(tab2$X3 != "1", 0, tab2$X3)
tab2$X1.1 <- ifelse(tab2$X1.1 != "1", 0, tab2$X1.1)

tab2[ , 2] <- str_remove_all(string = tab2[ , 2], pattern = ",")

tab2[ , 2] <- as.numeric(tab2[ , 2])
tab2[ , 3] <- as.numeric(tab2[ , 3])
tab2[ , 4] <- as.numeric(tab2[ , 4])
tab2[ , 5] <- as.numeric(tab2[ , 5])
tab2[ , 6] <- as.numeric(tab2[ , 6])
tab2[ , 7] <- as.numeric(tab2[ , 7])
tab2[ , 8] <- as.numeric(tab2[ , 8])
tab2[ , 9] <- as.numeric(tab2[ , 9])
tab2[ , 10] <- as.numeric(tab2[ , 10])

names(tab2) <- c("county", "pop2021",
                 "nh2011", "ch2011", "hc2011", "clinic2011",
                 "nh2021", "ch2021", "hc2021", "clinic2021")

healthPlan2011Table2 <- tab2
usethis::use_data(healthPlan2011Table2, overwrite = TRUE)

################################################################################

tab3 <- extract_tables(file = "data-raw/documents/natHealthPolicyPlan2011.pdf",
                       pages = 71,
                       method = "decide")