igproj-fusion
igproj-fusion
/ estatapi_example.R
Created
March 26, 2024 09:04
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| pacman::p_load( | |
| sf, | |
| estatapi, | |
| tidyverse) | |
| appId <- "*************************************" | |
| res <- estat_getStatsData( |
igproj-fusion
/ CaretakerRatio.R
Last active
March 24, 2024 07:50
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| pacman::p_load( | |
| openxlsx, | |
| tidyverse, | |
| sf, | |
| rmapshaper) | |
| URL <- "https://www.soumu.go.jp/main_content/000892857.xlsx" | |
| RATIO <- read.xlsx(URL, colNames = FALSE) |> |
igproj-fusion
/ JPpop_Gini47.R
Last active
March 23, 2024 00:36
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| pacman::p_load( | |
| tidyverse, | |
| reshape2, | |
| DescTools) | |
| ### GitHubからデータファイル読み込み | |
| ### Gini係数と信頼区間の表を作成 | |
| File <- "https://raw.githubusercontent.com/igproj-fusion/DemographicData/main/pop47census_1920_2020.csv" | |
| df <- read.csv(File) |> |
igproj-fusion
/ covidDeathMap.R
Last active
March 16, 2024 06:16
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| library(ggplot2) | |
| library(ggthemes) | |
| library(dplyr) | |
| library(sf) | |
| library(reshape2) | |
| popURL <- "https://raw.githubusercontent.com/igproj-fusion/population/main/pop47_20220101.csv" | |
| pop47 <- read.csv(popURL, header = TRUE) |> | |
| filter(city == "-") |> |
igproj-fusion
/ plotObservedDeath.R
Created
March 16, 2024 00:04
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| ########################################################## | |
| # | |
| # plot Observed.csv | |
| # | |
| ########################################################## | |
| if (!require("pacman")) { | |
| install.packages("pacman")} | |
| pacman::p_load( | |
| tidyverse, |
igproj-fusion
/ KSJadmin_gen.R
Last active
March 14, 2024 09:54
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| ####################################################################### | |
| # | |
| # 国土数値情報ダウンロードサイト | |
| # TOP > 国土数値情報 > 行政区域データ | |
| # https://nlftp.mlit.go.jp/ksj/gml/datalist/KsjTmplt-N03-v3_1.html | |
| # | |
| # 全国 N03-20230101_GML.zip | |
| # unzip後のパス："N03-20230101_GML/N03-23_230101.geojson" | |
| # | |
| ####################################################################### |
igproj-fusion
/ R_code_rev.R
Created
March 13, 2024 22:50
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| if (!require("pacman")) { | |
| install.packages("pacman")} | |
| pacman::p_load( | |
| surveillance, | |
| lubridate, | |
| tidyr, | |
| ggplot2, | |
| dplyr, | |
| gcookbook, | |
| cowplot, |
igproj-fusion
/ vegetation_kanto.R
Last active
March 8, 2024 08:46
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| ##################################################################### | |
| # | |
| # G空間情報センター／植生調査（1/25,000縮尺） | |
| # https://www.geospatial.jp/ckan/dataset/biodic-vege-25000 | |
| # | |
| ##################################################################### | |
| if (!require("pacman")) { | |
| install.packages("pacman")} |
igproj-fusion
/ ChibaEarthquake_ver2.R
Last active
March 4, 2024 00:06
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| #################################################################### | |
| # | |
| # 千葉県南部＆東方沖地震のM-T図と震源マップ作製 | |
| # | |
| # データソース： | |
| # 震源データベースと震源マップ（リアルタイム版） | |
| # http://agora.ex.nii.ac.jp/earthquake/hypocenter/ | |
| # | |
| #################################################################### |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| ##################################################################### | |
| # | |
| # YAHOO!JAPAN 天気・災害 | |
| # | |
| # 千葉県東方沖 地震時系列 | |
| # https://typhoon.yahoo.co.jp/weather/jp/earthquake/list/?e=473 | |
| # | |
| # 千葉県南部 地震時系列 | |
| # https://typhoon.yahoo.co.jp/weather/jp/earthquake/list/?e=342 | |
| # |