fix bugs in anonymous function

_targets.R

@@ -88,7 +88,7 @@ list(
     # to avoid conflicts of writing to the same file at the same time
     (\(it_chi_deaths_data, tests_sc_demog_lookup) {
       process_tests_it_chi_deaths(it_chi_deaths_data)
-    }(it_chi_deaths_data, tests_sc_demog_lookup))
+    })(it_chi_deaths_data, tests_sc_demog_lookup)
   ),
   tar_target(
     source_gp_lookup,
@@ -105,7 +105,7 @@ list(
     tests_source_gp_lookup,
     (\(source_gp_lookup, tests_it_chi_deaths) {
       process_tests_lookup_gpprac(source_gp_lookup)
-    }(source_gp_lookup, tests_it_chi_deaths))
+    })(source_gp_lookup, tests_it_chi_deaths)
   ),
   tar_target(
     source_pc_lookup,
@@ -122,7 +122,7 @@ list(
     tests_source_pc_lookup,
     (\(source_pc_lookup, tests_source_gp_lookup) {
       process_tests_lookup_pc(source_pc_lookup)
-    }(source_pc_lookup, tests_source_gp_lookup))
+    })(source_pc_lookup, tests_source_gp_lookup)
   ),
   ### Cost Lookups ----
   tar_target(ch_cost_lookup, process_costs_ch_rmd(), priority = 0.8),
@@ -152,7 +152,7 @@ list(
     tests_sc_all_at,
     (\(all_at, tests_source_pc_lookup) {
       process_tests_sc_all_at_episodes(all_at)
-    }(all_at, tests_source_pc_lookup))
+    })(all_at, tests_source_pc_lookup)
   ),
   tar_target(
     all_home_care_extract,
@@ -176,7 +176,7 @@ list(
     tests_sc_all_home_care,
     (\(all_home_care, tests_sc_all_at) {
       process_tests_sc_all_hc_episodes(all_home_care)
-    }(all_home_care, tests_sc_all_at))
+    })(all_home_care, tests_sc_all_at)
   ),
   tar_target(
     all_care_home_extract,
@@ -210,7 +210,7 @@ list(
     tests_all_care_home,
     (\(all_care_home, tests_sc_all_home_care) {
       process_tests_sc_all_ch_episodes(all_care_home)
-    }(all_care_home, tests_sc_all_home_care))
+    })(all_care_home, tests_sc_all_home_care)
   ),
   tar_target(
     all_sds_extract,
@@ -234,7 +234,7 @@ list(
     tests_sc_all_sds,
     (\(all_sds, tests_all_care_home) {
       process_tests_sc_all_sds_episodes(all_sds)
-    }(all_sds, tests_all_care_home))
+    })(all_sds, tests_all_care_home)
   ),
 
   ## Phase II, year specific ----
@@ -362,7 +362,7 @@ list(
           source_ae_extract,
           year
         )
-      }(source_ae_extract, year, tests_source_acute_extract))
+      })(source_ae_extract, year, tests_source_acute_extract)
     ),
     tar_target(source_cmh_extract, process_extract_cmh(
       cmh_data,
@@ -377,7 +377,7 @@ list(
           source_cmh_extract,
           year
         )
-      }(source_cmh_extract, year, tests_source_ae_extract))
+      })(source_cmh_extract, year, tests_source_ae_extract)
     ),
     tar_target(source_dd_extract, process_extract_delayed_discharges(
       dd_data,
@@ -392,7 +392,7 @@ list(
           source_dd_extract,
           year
         )
-      }(source_dd_extract, year, tests_source_cmh_extract))
+      })(source_dd_extract, year, tests_source_cmh_extract)
     ),
     tar_target(source_dn_extract, process_extract_district_nursing(
       dn_data,
@@ -408,7 +408,7 @@ list(
           source_dn_extract,
           year
         )
-      }(source_dn_extract, year, tests_source_dd_extract))
+      })(source_dn_extract, year, tests_source_dd_extract)
     ),
     tar_target(
       source_homelessness_extract,
@@ -427,7 +427,7 @@ list(
           source_homelessness_extract,
           year
         )
-      }(source_homelessness_extract, year, tests_source_dn_extract))
+      })(source_homelessness_extract, year, tests_source_dn_extract)
     ),
     tar_target(source_ltc_lookup, process_lookup_ltc(
       ltc_data,
@@ -442,7 +442,7 @@ list(
           source_ltc_lookup,
           year
         )
-      }(source_ltc_lookup, year, tests_source_homelessness_extract))
+      })(source_ltc_lookup, year, tests_source_homelessness_extract)
     ),
     tar_target(source_maternity_extract, process_extract_maternity(
       maternity_data,
@@ -457,7 +457,7 @@ list(
           source_maternity_extract,
           year
         )
-      }(source_maternity_extract, year, tests_ltc))
+      })(source_maternity_extract, year, tests_ltc)
     ),
     tar_target(
       source_mental_health_extract,
@@ -475,7 +475,7 @@ list(
           source_mental_health_extract,
           year
         )
-      }(source_mental_health_extract, year, tests_source_maternity_extract))
+      })(source_mental_health_extract, year, tests_source_maternity_extract)
     ),
     # tar_target(source_nrs_deaths_extract, process_extract_nrs_deaths(
     #   nrs_deaths_data,
@@ -499,7 +499,7 @@ list(
           source_nrs_deaths_extract,
           year
         )
-      }(source_nrs_deaths_extract, year, tests_source_mental_health_extract))
+      })(source_nrs_deaths_extract, year, tests_source_mental_health_extract)
     ),
     tar_target(source_ooh_extract, process_extract_gp_ooh(
       year,
@@ -515,7 +515,7 @@ list(
           source_ooh_extract,
           year
         )
-      }(source_ooh_extract, year, tests_source_nrs_deaths_extract))
+      })(source_ooh_extract, year, tests_source_nrs_deaths_extract)
     ),
     tar_target(source_outpatients_extract, process_extract_outpatients(
       outpatients_data,
@@ -530,7 +530,7 @@ list(
           source_outpatients_extract,
           year
         )
-      }(source_outpatients_extract, year, tests_source_ooh_extract))
+      })(source_outpatients_extract, year, tests_source_ooh_extract)
     ),
     tar_target(source_prescribing_extract, process_extract_prescribing(
       prescribing_data,
@@ -545,7 +545,7 @@ list(
           source_prescribing_extract,
           year
         )
-      }(source_prescribing_extract, year, tests_source_outpatients_extract))
+      })(source_prescribing_extract, year, tests_source_outpatients_extract)
     ),
     ### Target process year specific social care ----
     tar_target(
@@ -568,7 +568,7 @@ list(
       tests_sc_client_lookup,
       (\(sc_client_lookup, year, tests_prescribing){
         process_tests_sc_client_lookup(sc_client_lookup, year = year)
-      }(sc_client_lookup, year, tests_prescribing))
+      })(sc_client_lookup, year, tests_prescribing)
     ),
     tar_target(
       source_sc_alarms_tele,
@@ -586,7 +586,7 @@ list(
           data = source_sc_alarms_tele,
           year = year
         )
-      }(source_sc_alarms_tele, year, tests_sc_client_lookup))
+      })(source_sc_alarms_tele, year, tests_sc_client_lookup)
     ),
     tar_target(
       source_sc_care_home,
@@ -605,7 +605,7 @@ list(
           data = source_sc_care_home,
           year = year
         )
-      }(source_sc_care_home, year, tests_alarms_telecare))
+      })(source_sc_care_home, year, tests_alarms_telecare)
     ),
     tar_target(
       source_sc_home_care,
@@ -623,7 +623,7 @@ list(
           data = source_sc_home_care,
           year = year
         )
-      }(source_sc_home_care, year, tests_care_home))
+      })(source_sc_home_care, year, tests_care_home)
     ),
     tar_target(
       source_sc_sds,
@@ -641,7 +641,7 @@ list(
           data = source_sc_sds,
           year = year
         )
-      }(source_sc_sds, year, tests_home_care))
+      })(source_sc_sds, year, tests_home_care)
     ),
     tar_target(
       slf_deaths_lookup,