omavalitsused_nimekiri.R 329 B

1234567891011121314
  1. #'
  2. #' Omavalitsuste (valdade) nimekiri
  3. #'
  4. omavalitsused_nimekiri <- function() {
  5. conn <- ruut::db_connect()
  6. q <- sprintf("SELECT *
  7. FROM %s", "maaamet.omavalitsus")
  8. cat(sprintf("\n-----------------\n%s\n\n", q))
  9. x <- DBI::dbGetQuery(conn, q)[,"onimi"]
  10. DBI::dbDisconnect(conn)
  11. x
  12. }
  13. # onimi <- omavalitsused_nimekiri()