tonami_place_name <- read.delim(f <- file("http://linkdata.org/api/1/rdf1s3164i/tonami_place_name_R.txt", open="r", encoding="UTF-8"), header=T); close(f);
cat(sprintf("variable %s is initialized.\n" , "tonami_place_name"));