"0","missing_material_category <- filter(weight_calc, is.na(deconMaterialName)) %>%"
"0","   filter(!is.na(listed_quantity) )"
"0","write_csv(missing_material_category, ""output/missing_deconMaterialName.csv"", na = "" "")"
