1
0
mirror of https://github.com/msberends/AMR.git synced 2025-07-11 05:02:06 +02:00

new Norwegian link

This commit is contained in:
2024-03-03 23:24:57 +01:00
parent f2d245b0cb
commit bc4f8515e2
26 changed files with 50 additions and 50 deletions

View File

@ -4,7 +4,7 @@ library(tidyr)
library(AMR)
# we need J01, J02 and J04 (J03 does not exist)
url <- "https://www.whocc.no/atc_ddd_index/?code={code}&showdescription=no"
url <- "https://atcddd.fhi.no/atc_ddd_index/?code={code}&showdescription=no"
complete_vector <- character(0)
for (Jxx in c("J01", "J02", "J04")) {
site <- gsub("{code}", Jxx, url, fixed = TRUE)