Rで令和4年の国民生活基礎調査から年齢別の悩みやストレスの原因を面グラフを作るまで。 e-statのAPIを使って対象のデータを取得して、先頭の150行を表示。
options(crayon.enabled = FALSE) # 色無効化 library(tidyverse) library(httr) library(Polychrome) # palette36
── Attaching core tidyverse packages ──────────────────────────────────────────────────────────── tidyverse 2.0.0 ── ✔ dplyr 1.1.4 ✔ readr 2.1.5 ✔ forcats 1.0.0 ✔ stringr 1.5.1 ✔ ggplot2 3.5.2 ✔ tibble 3.2.1 ✔ lubridate 1.9.4 ✔ tidyr 1.3.1 ✔ purrr 1.0.4 ── Conflicts ────────────────────────────────────────────────────────────────────────────── tidyverse_conflicts() ── ✖ dplyr::filter() masks stats::filter() ✖ dplyr::lag() masks stats::lag() ℹ Use the conflicted package (<http://conflicted.r-lib.org/>) to force all conflicts to become errors
apikey = "1234abcdxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx" # e-statで取得した自分用のAPIキー # 国民生活基礎調査 令和4年国民生活基礎調査 健康 # 世帯人員(12歳以上),悩みやストレスの有-悩みやストレスの原因(複数回答)-無・性・年齢(5歳階級)別 # https://www.e-stat.go.jp/dbview?sid=0002040955 c <- paste0("http://api.e-stat.go.jp/rest/3.0/app/getSimpleStatsData?appId=", apikey, "&lang=J&statsDataId=0002040955&metaGetFlg=Y&cntGetFlg=N&explanationGetFlg=Y&annotationGetFlg=Y§ionHeaderFlg=1&replaceSpChars=0") res <- GET(c) text <- content(res, as = "text", encoding = "UTF-8") lines <- strsplit(text, "\n")[[1]] head(lines, 150)
[1] "\"RESULT\"" [2] "\"STATUS\",\"0\"" [3] "\"ERROR_MSG\",\"正常に終了しました。\"" [4] "\"DATE\",\"2025-06-16T00:56:07.207+09:00\"" [5] "\"RESULT_INF\"" [6] "\"TOTAL_NUMBER\",\"1560\"" [7] "\"FROM_NUMBER\",\"1\"" [8] "\"TO_NUMBER\",\"1560\"" [9] "\"TABLE_INF\",\"0002040955\"" [10] "\"STAT_NAME\",\"00450061\",\"国民生活基礎調査\"" [11] "\"GOV_ORG\",\"00450\",\"厚生労働省\"" [12] "\"STATISTICS_NAME\",\"令和4年国民生活基礎調査 健康\"" [13] "\"TITLE\",\"13\",\"02 世帯人員(第5表~第86表) 世帯人員(12歳以上),悩みやストレスの有-悩みやストレスの原因(複数回答)-無・性・年齢(5歳階級)別\"" [14] "\"CYCLE\",\"年次\"" [15] "\"SURVEY_DATE\",\"202201-202212\"" [16] "\"OPEN_DATE\",\"2024-03-25\"" [17] "\"SMALL_AREA\",\"0\"" [18] "\"COLLECT_AREA\",\"該当なし\"" [19] "\"MAIN_CATEGORY\",\"02\",\"人口・世帯\"" [20] "\"SUB_CATEGORY\",\"02\",\"世帯\"" [21] "\"OVERALL_TOTAL_NUMBER\",\"1560\"" [22] "\"UPDATED_DATE\",\"2025-03-19\"" [23] "\"STATISTICS_NAME_SPEC\",\"令和4年国民生活基礎調査\",\"健康\",\"\",\"\",\"\",\"\"" [24] "\"TITLE_SPEC\",\"02 世帯人員(第5表~第86表)\",\"世帯人員(12歳以上),悩みやストレスの有-悩みやストレスの原因(複数回答)-無・性・年齢(5歳階級)別\",\"世帯人員には、入院者は含まない。\",\"\",\"\",\"\"" [25] "\"NOTE\",\" ・\",\"統計項目のあり得ない場合\"" [26] "\"NOTE\",\" ・\",\"H22の内H3265csv内データ[ ・]\"" [27] "\"NOTE\",\"* 211.9\",\"H21のH2011.csv内データ [* 211.9]\"" [28] "\"NOTE\",\"* 233.4\",\"H21のH2011.csv内データ [* 233.4]\"" [29] "\"NOTE\",\"* 233.6\",\"H21のH2011.csv内データ [* 233.6]\"" [30] "\"NOTE\",\"* 236.8\",\"H19のh21011.csv内データ [*236.8]\"" [31] "\"NOTE\",\"-\",\"計数のない場合\"" [32] "\"NOTE\",\".\",\".\"" [33] "\"NOTE\",\"0\",\"推計数が表章単位の2分の1未満の場合\"" [34] "\"NOTE\",\"0.0\",\"比率が微小(0.05未満)の場合\"" [35] "\"NOTE\",\"…\",\"計数不明又は計数を表章することが不適切な場合\"" [36] "\"NOTE\",\"△\",\"減少数(率)の場合\"" [37] "\"NOTE\",\" ・\",\"統計項目のあり得ない場合\"" [38] "\"NOTE\",\" ・\",\"統計項目のあり得ない場合\"" [39] "\"NOTE\",\" ・\",\"H13の内g32.csv内データ[ ・]\"" [40] "\"NOTE\",\" ・\",\"H13の内g36.csv内データ[ ・]\"" [41] "\"NOTE\",\" ・\",\"H22のh3253.csv内データ [ ・]\"" [42] "\"NOTE\",\" ・\",\"統計項目のあり得ない場合\"" [43] "\"NOTE\",\" ・\",\"統計項目のあり得ない場合\"" [44] "\"NOTE\",\" ・\",\"H22の内H3419csv内データ[ ・]\"" [45] "\"NOTE\",\" ・\",\"H22の内H3253csv内データ[ ・]\"" [46] "\"NOTE\",\" ・\",\" ・\"" [47] "\"NOTE\",\" ・\",\"統計項目のあり得ない場合\"" [48] "\"NOTE\",\" ・\",\"H22のh3254.csv内データ[ ・]\"" [49] "\"NOTE\",\" ・\",\"H22の内H3211csv内データ[ ・]\"" [50] "\"NOTE\",\" .\",\" .\"" [51] "\"NOTE\",\" ・\",\" ・\"" [52] "\"NOTE\",\" ・\",\"H22のh11027csv内データ[ ・]\"" [53] "\"NOTE\",\" ・\",\"H22の内H3255csv内データ[ ・]\"" [54] "\"NOTE\",\" ・\",\" ・\"" [55] "\"NOTE\",\" ・\",\"H22のhCA-h22-h3263.csv内のデータ [ ・]\"" [56] "\"NOTE\",\" ・・・\",\"統計項目のあり得ない場合\"" [57] "\"NOTE\",\" -\",\"計数のない場合\"" [58] "\"NOTE\",\" .\",\" .\"" [59] "\"NOTE\",\" .\",\" .\"" [60] "\"NOTE\",\" ・\",\" ・\"" [61] "\"NOTE\",\" ・\",\"H23のH1046内データ[ ・]\"" [62] "\"NOTE\",\" .\",\" .\"" [63] "\"NOTE\",\" ・\",\"統計項目のあり得ない場合\"" [64] "\"NOTE\",\" ・\",\" ・H19のH5403csv内データ \"" [65] "\"NOTE\",\" .\",\" .\"" [66] "\"NOTE\",\" ・\",\" ・\"" [67] "\"NOTE\",\" ・\",\" ・\"" [68] "\"NOTE\",\" ・\",\"H22の内H3273csv内データ[ ・]\"" [69] "\"NOTE\",\" ・\",\" ・\"" [70] "\"NOTE\",\" ・\",\"H23のH1033csv内データ[ ・]\"" [71] "\"NOTE\",\" ・ \",\"H23のH1034csv内データ[ ・]\"" [72] "\"NOTE\",\" ・・・\",\"統計項目のあり得ない場合\"" [73] "\"NOTE\",\" ・\",\" ・\"" [74] "\"NOTE\",\" ・\",\"H19の内H3421csv内データ[ ・]\"" [75] "\"NOTE\",\" ・\",\" ・\"" [76] "\"NOTE\",\" ・\",\" ・\"" [77] "\"NOTE\",\"・\",\"全角「・」\"" [78] "\"NOTE\",\"・・・\",\"統計項目のあり得ない場合\"" [79] "\"NOTE\",\"注:4)\",\"注:4)\"" [80] "\"NOTE\",\"注:5)\",\"注:5)\"" [81] "\"NOTE\",\"注:1)\",\"注:1)\"" [82] "\"NOTE\",\"注:3)\",\"注:3)\"" [83] "\"NOTE\",\"注:4)\",\"注:4)\"" [84] "\"NOTE\",\"注:5)\",\"注:5)\"" [85] "\"NOTE\",\"注:6)\",\"注:6)\"" [86] "\"NOTE\",\"注:1)\",\"注:1)\"" [87] "\"NOTE\",\"注:2)\",\"注:2)\"" [88] "\"NOTE\",\"注:3)\",\"注:3)\"" [89] "\"NOTE\",\"注:4)\",\"注:4)\"" [90] "\"NOTE\",\"注:5)\",\"注:5)\"" [91] "\"NOTE\",\"注:6)\",\"注:6)\"" [92] "\"NOTE\",\"*\",\"客体が少ない場合\"" [93] "\"NOTE\",\"・\",\"統計項目のありえない場合\"" [94] "\"NOTE\",\"・・・\",\"統計項目のあり得ない場合\"" [95] "\"VALUE\"" [96] "\"tab_code\",\"表章項目\",\"cat01_code\",\"悩みやストレスの原因項目_2015\",\"cat02_code\",\"悩みやストレスの有無_2015\",\"cat03_code\",\"年齢(5歳階級)_008\",\"cat04_code\",\"性_002\",\"time_code\",\"調査年度\",\"unit\",\"value\",\"annotation\"" [97] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"1\",\"総数\",\"1\",\"総数\",\"15\",\"2022年(令和4年)\",\"千人\",\"101417\",\"\"" [98] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"1\",\"総数\",\"2\",\"男\",\"15\",\"2022年(令和4年)\",\"千人\",\"48515\",\"\"" [99] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"1\",\"総数\",\"3\",\"女\",\"15\",\"2022年(令和4年)\",\"千人\",\"52902\",\"\"" [100] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"2\",\"12~14歳\",\"1\",\"総数\",\"15\",\"2022年(令和4年)\",\"千人\",\"2733\",\"\"" [101] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"2\",\"12~14歳\",\"2\",\"男\",\"15\",\"2022年(令和4年)\",\"千人\",\"1412\",\"\"" [102] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"2\",\"12~14歳\",\"3\",\"女\",\"15\",\"2022年(令和4年)\",\"千人\",\"1321\",\"\"" [103] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"3\",\"15~19歳\",\"1\",\"総数\",\"15\",\"2022年(令和4年)\",\"千人\",\"4516\",\"\"" [104] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"3\",\"15~19歳\",\"2\",\"男\",\"15\",\"2022年(令和4年)\",\"千人\",\"2299\",\"\"" [105] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"3\",\"15~19歳\",\"3\",\"女\",\"15\",\"2022年(令和4年)\",\"千人\",\"2218\",\"\"" [106] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"4\",\"20~24歳\",\"1\",\"総数\",\"15\",\"2022年(令和4年)\",\"千人\",\"3994\",\"\"" [107] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"4\",\"20~24歳\",\"2\",\"男\",\"15\",\"2022年(令和4年)\",\"千人\",\"1982\",\"\"" [108] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"4\",\"20~24歳\",\"3\",\"女\",\"15\",\"2022年(令和4年)\",\"千人\",\"2012\",\"\"" [109] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"5\",\"25~29歳\",\"1\",\"総数\",\"15\",\"2022年(令和4年)\",\"千人\",\"3965\",\"\"" [110] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"5\",\"25~29歳\",\"2\",\"男\",\"15\",\"2022年(令和4年)\",\"千人\",\"1966\",\"\"" [111] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"5\",\"25~29歳\",\"3\",\"女\",\"15\",\"2022年(令和4年)\",\"千人\",\"1999\",\"\"" [112] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"6\",\"30~34歳\",\"1\",\"総数\",\"15\",\"2022年(令和4年)\",\"千人\",\"4676\",\"\"" [113] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"6\",\"30~34歳\",\"2\",\"男\",\"15\",\"2022年(令和4年)\",\"千人\",\"2372\",\"\"" [114] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"6\",\"30~34歳\",\"3\",\"女\",\"15\",\"2022年(令和4年)\",\"千人\",\"2304\",\"\"" [115] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"7\",\"35~39歳\",\"1\",\"総数\",\"15\",\"2022年(令和4年)\",\"千人\",\"5642\",\"\"" [116] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"7\",\"35~39歳\",\"2\",\"男\",\"15\",\"2022年(令和4年)\",\"千人\",\"2781\",\"\"" [117] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"7\",\"35~39歳\",\"3\",\"女\",\"15\",\"2022年(令和4年)\",\"千人\",\"2861\",\"\"" [118] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"8\",\"40~44歳\",\"1\",\"総数\",\"15\",\"2022年(令和4年)\",\"千人\",\"6584\",\"\"" [119] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"8\",\"40~44歳\",\"2\",\"男\",\"15\",\"2022年(令和4年)\",\"千人\",\"3291\",\"\"" [120] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"8\",\"40~44歳\",\"3\",\"女\",\"15\",\"2022年(令和4年)\",\"千人\",\"3293\",\"\"" [121] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"9\",\"45~49歳\",\"1\",\"総数\",\"15\",\"2022年(令和4年)\",\"千人\",\"8205\",\"\"" [122] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"9\",\"45~49歳\",\"2\",\"男\",\"15\",\"2022年(令和4年)\",\"千人\",\"4059\",\"\"" [123] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"9\",\"45~49歳\",\"3\",\"女\",\"15\",\"2022年(令和4年)\",\"千人\",\"4146\",\"\"" [124] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"10\",\"50~54歳\",\"1\",\"総数\",\"15\",\"2022年(令和4年)\",\"千人\",\"8257\",\"\"" [125] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"10\",\"50~54歳\",\"2\",\"男\",\"15\",\"2022年(令和4年)\",\"千人\",\"3955\",\"\"" [126] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"10\",\"50~54歳\",\"3\",\"女\",\"15\",\"2022年(令和4年)\",\"千人\",\"4302\",\"\"" [127] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"11\",\"55~59歳\",\"1\",\"総数\",\"15\",\"2022年(令和4年)\",\"千人\",\"7583\",\"\"" [128] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"11\",\"55~59歳\",\"2\",\"男\",\"15\",\"2022年(令和4年)\",\"千人\",\"3643\",\"\"" [129] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"11\",\"55~59歳\",\"3\",\"女\",\"15\",\"2022年(令和4年)\",\"千人\",\"3941\",\"\"" [130] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"12\",\"60~64歳\",\"1\",\"総数\",\"15\",\"2022年(令和4年)\",\"千人\",\"7769\",\"\"" [131] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"12\",\"60~64歳\",\"2\",\"男\",\"15\",\"2022年(令和4年)\",\"千人\",\"3737\",\"\"" [132] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"12\",\"60~64歳\",\"3\",\"女\",\"15\",\"2022年(令和4年)\",\"千人\",\"4032\",\"\"" [133] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"13\",\"65~69歳\",\"1\",\"総数\",\"15\",\"2022年(令和4年)\",\"千人\",\"8543\",\"\"" [134] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"13\",\"65~69歳\",\"2\",\"男\",\"15\",\"2022年(令和4年)\",\"千人\",\"4137\",\"\"" [135] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"13\",\"65~69歳\",\"3\",\"女\",\"15\",\"2022年(令和4年)\",\"千人\",\"4406\",\"\"" [136] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"14\",\"70~74歳\",\"1\",\"総数\",\"15\",\"2022年(令和4年)\",\"千人\",\"10566\",\"\"" [137] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"14\",\"70~74歳\",\"2\",\"男\",\"15\",\"2022年(令和4年)\",\"千人\",\"4978\",\"\"" [138] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"14\",\"70~74歳\",\"3\",\"女\",\"15\",\"2022年(令和4年)\",\"千人\",\"5588\",\"\"" [139] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"15\",\"75~79歳\",\"1\",\"総数\",\"15\",\"2022年(令和4年)\",\"千人\",\"7517\",\"\"" [140] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"15\",\"75~79歳\",\"2\",\"男\",\"15\",\"2022年(令和4年)\",\"千人\",\"3461\",\"\"" [141] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"15\",\"75~79歳\",\"3\",\"女\",\"15\",\"2022年(令和4年)\",\"千人\",\"4056\",\"\"" [142] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"16\",\"80~84歳\",\"1\",\"総数\",\"15\",\"2022年(令和4年)\",\"千人\",\"5722\",\"\"" [143] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"16\",\"80~84歳\",\"2\",\"男\",\"15\",\"2022年(令和4年)\",\"千人\",\"2526\",\"\"" [144] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"16\",\"80~84歳\",\"3\",\"女\",\"15\",\"2022年(令和4年)\",\"千人\",\"3196\",\"\"" [145] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"17\",\"85歳以上\",\"1\",\"総数\",\"15\",\"2022年(令和4年)\",\"千人\",\"5142\",\"\"" [146] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"17\",\"85歳以上\",\"2\",\"男\",\"15\",\"2022年(令和4年)\",\"千人\",\"1914\",\"\"" [147] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"17\",\"85歳以上\",\"3\",\"女\",\"15\",\"2022年(令和4年)\",\"千人\",\"3228\",\"\"" [148] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"18\",\"(再掲)65歳以上\",\"1\",\"総数\",\"15\",\"2022年(令和4年)\",\"千人\",\"37491\",\"\"" [149] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"18\",\"(再掲)65歳以上\",\"2\",\"男\",\"15\",\"2022年(令和4年)\",\"千人\",\"17017\",\"\"" [150] "\"3130\",\"世帯人員(12歳以上)\",\"110\",\"総数\",\"110\",\"総数\",\"18\",\"(再掲)65歳以上\",\"3\",\"女\",\"15\",\"2022年(令和4年)\",\"千人\",\"20475\",\"\""
結果の96行目からCSVデータになっているので95行skipした上でCSVとして読み込みする。
list2 <- read_csv(text, skip = 95, na = c("", "-")) # - はNAとして扱う print(list2, n=30, width = Inf)
indexing file2480c3ce1b114 [====================================================================] 8.19GB/s, eta: 0s Rows: 1560 Columns: 15 ── Column specification ──────────────────────────────────────────────────────────────────────────────────────────── Delimiter: "," chr (7): 表章項目, 悩みやストレスの原因項目_2015, 悩みやストレスの有無_2015, 年齢(5歳階級)_008, 性_002, 調査年度, unit... dbl (7): tab_code, cat01_code, cat02_code, cat03_code, cat04_code, time_code, value lgl (1): annotation ℹ Use `spec()` to retrieve the full column specification for this data. ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message. # A tibble: 1,560 × 15 tab_code 表章項目 cat01_code 悩みやストレスの原因項目_2015 cat02_code 悩みやストレスの有無_2015 <dbl> <chr> <dbl> <chr> <dbl> <chr> 1 3130 世帯人員(12歳以上) 110 総数 110 総数 2 3130 世帯人員(12歳以上) 110 総数 110 総数 3 3130 世帯人員(12歳以上) 110 総数 110 総数 4 3130 世帯人員(12歳以上) 110 総数 110 総数 5 3130 世帯人員(12歳以上) 110 総数 110 総数 6 3130 世帯人員(12歳以上) 110 総数 110 総数 7 3130 世帯人員(12歳以上) 110 総数 110 総数 8 3130 世帯人員(12歳以上) 110 総数 110 総数 9 3130 世帯人員(12歳以上) 110 総数 110 総数 10 3130 世帯人員(12歳以上) 110 総数 110 総数 11 3130 世帯人員(12歳以上) 110 総数 110 総数 12 3130 世帯人員(12歳以上) 110 総数 110 総数 13 3130 世帯人員(12歳以上) 110 総数 110 総数 14 3130 世帯人員(12歳以上) 110 総数 110 総数 15 3130 世帯人員(12歳以上) 110 総数 110 総数 16 3130 世帯人員(12歳以上) 110 総数 110 総数 17 3130 世帯人員(12歳以上) 110 総数 110 総数 18 3130 世帯人員(12歳以上) 110 総数 110 総数 19 3130 世帯人員(12歳以上) 110 総数 110 総数 20 3130 世帯人員(12歳以上) 110 総数 110 総数 21 3130 世帯人員(12歳以上) 110 総数 110 総数 22 3130 世帯人員(12歳以上) 110 総数 110 総数 23 3130 世帯人員(12歳以上) 110 総数 110 総数 24 3130 世帯人員(12歳以上) 110 総数 110 総数 25 3130 世帯人員(12歳以上) 110 総数 110 総数 26 3130 世帯人員(12歳以上) 110 総数 110 総数 27 3130 世帯人員(12歳以上) 110 総数 110 総数 28 3130 世帯人員(12歳以上) 110 総数 110 総数 29 3130 世帯人員(12歳以上) 110 総数 110 総数 30 3130 世帯人員(12歳以上) 110 総数 110 総数 cat03_code `年齢(5歳階級)_008` cat04_code 性_002 time_code 調査年度 unit value annotation <dbl> <chr> <dbl> <chr> <dbl> <chr> <chr> <dbl> <lgl> 1 1 総数 1 総数 15 2022年(令和4年) 千人 101417 NA 2 1 総数 2 男 15 2022年(令和4年) 千人 48515 NA 3 1 総数 3 女 15 2022年(令和4年) 千人 52902 NA 4 2 12~14歳 1 総数 15 2022年(令和4年) 千人 2733 NA 5 2 12~14歳 2 男 15 2022年(令和4年) 千人 1412 NA 6 2 12~14歳 3 女 15 2022年(令和4年) 千人 1321 NA 7 3 15~19歳 1 総数 15 2022年(令和4年) 千人 4516 NA 8 3 15~19歳 2 男 15 2022年(令和4年) 千人 2299 NA 9 3 15~19歳 3 女 15 2022年(令和4年) 千人 2218 NA 10 4 20~24歳 1 総数 15 2022年(令和4年) 千人 3994 NA 11 4 20~24歳 2 男 15 2022年(令和4年) 千人 1982 NA 12 4 20~24歳 3 女 15 2022年(令和4年) 千人 2012 NA 13 5 25~29歳 1 総数 15 2022年(令和4年) 千人 3965 NA 14 5 25~29歳 2 男 15 2022年(令和4年) 千人 1966 NA 15 5 25~29歳 3 女 15 2022年(令和4年) 千人 1999 NA 16 6 30~34歳 1 総数 15 2022年(令和4年) 千人 4676 NA 17 6 30~34歳 2 男 15 2022年(令和4年) 千人 2372 NA 18 6 30~34歳 3 女 15 2022年(令和4年) 千人 2304 NA 19 7 35~39歳 1 総数 15 2022年(令和4年) 千人 5642 NA 20 7 35~39歳 2 男 15 2022年(令和4年) 千人 2781 NA 21 7 35~39歳 3 女 15 2022年(令和4年) 千人 2861 NA 22 8 40~44歳 1 総数 15 2022年(令和4年) 千人 6584 NA 23 8 40~44歳 2 男 15 2022年(令和4年) 千人 3291 NA 24 8 40~44歳 3 女 15 2022年(令和4年) 千人 3293 NA 25 9 45~49歳 1 総数 15 2022年(令和4年) 千人 8205 NA 26 9 45~49歳 2 男 15 2022年(令和4年) 千人 4059 NA 27 9 45~49歳 3 女 15 2022年(令和4年) 千人 4146 NA 28 10 50~54歳 1 総数 15 2022年(令和4年) 千人 8257 NA 29 10 50~54歳 2 男 15 2022年(令和4年) 千人 3955 NA 30 10 50~54歳 3 女 15 2022年(令和4年) 千人 4302 NA # ℹ 1,530 more rows # ℹ Use `print(n = ...)` to see more rows
続いてデータの整形。不要データの削除と、後で利用しやすいように列名の変更を行う。
nayami <- list2 |> filter(cat01_code != 110) |> #悩み:総数を除く filter(cat03_code != 1) |> filter(cat03_code < 18) |> #(再掲)の行は不要 filter(cat04_code != 1) |> #性別 総数を除く filter(cat01_code != 310) |> #悩み:その他 を除く filter(cat01_code != 320) |> #悩み:わからない を除く filter(cat01_code != 330) |> #悩み:不詳 を除く mutate(value = replace_na(value, 0)) |> rename(nayami = 悩みやストレスの原因項目_2015) |> rename(agelevel = `年齢(5歳階級)_008`) |> rename(gender = 性_002) |> select(-(tab_code:cat01_code)) |> select(-(cat02_code:cat03_code)) |> select(-cat04_code) |> select(-(time_code:unit)) |> select(-annotation) |> print(n=Inf, width = Inf)
# A tibble: 608 × 4 nayami agelevel gender value <chr> <chr> <chr> <dbl> 1 家族との人間関係 12~14歳 男 46 2 家族との人間関係 12~14歳 女 64 3 家族との人間関係 15~19歳 男 77 4 家族との人間関係 15~19歳 女 107 5 家族との人間関係 20~24歳 男 72 6 家族との人間関係 20~24歳 女 125 7 家族との人間関係 25~29歳 男 94 8 家族との人間関係 25~29歳 女 153 9 家族との人間関係 30~34歳 男 137 10 家族との人間関係 30~34歳 女 232 11 家族との人間関係 35~39歳 男 174 12 家族との人間関係 35~39歳 女 335 13 家族との人間関係 40~44歳 男 215 14 家族との人間関係 40~44歳 女 385 15 家族との人間関係 45~49歳 男 265 16 家族との人間関係 45~49歳 女 509 17 家族との人間関係 50~54歳 男 232 18 家族との人間関係 50~54歳 女 520 19 家族との人間関係 55~59歳 男 210 20 家族との人間関係 55~59歳 女 490 21 家族との人間関係 60~64歳 男 208 22 家族との人間関係 60~64歳 女 419 23 家族との人間関係 65~69歳 男 200 24 家族との人間関係 65~69歳 女 457 25 家族との人間関係 70~74歳 男 211 26 家族との人間関係 70~74歳 女 463 27 家族との人間関係 75~79歳 男 181 28 家族との人間関係 75~79歳 女 315 29 家族との人間関係 80~84歳 男 152 30 家族との人間関係 80~84歳 女 265 31 家族との人間関係 85歳以上 男 118 32 家族との人間関係 85歳以上 女 238 33 家族以外との人間関係 12~14歳 男 88 34 家族以外との人間関係 12~14歳 女 169 35 家族以外との人間関係 15~19歳 男 141 36 家族以外との人間関係 15~19歳 女 289 37 家族以外との人間関係 20~24歳 男 135 38 家族以外との人間関係 20~24歳 女 234 39 家族以外との人間関係 25~29歳 男 150 40 家族以外との人間関係 25~29歳 女 249 41 家族以外との人間関係 30~34歳 男 211 42 家族以外との人間関係 30~34歳 女 280 43 家族以外との人間関係 35~39歳 男 242 44 家族以外との人間関係 35~39歳 女 340 45 家族以外との人間関係 40~44歳 男 284 46 家族以外との人間関係 40~44歳 女 372 47 家族以外との人間関係 45~49歳 男 357 48 家族以外との人間関係 45~49歳 女 483 49 家族以外との人間関係 50~54歳 男 329 50 家族以外との人間関係 50~54歳 女 489 51 家族以外との人間関係 55~59歳 男 265 52 家族以外との人間関係 55~59歳 女 425 53 家族以外との人間関係 60~64歳 男 243 54 家族以外との人間関係 60~64歳 女 327 55 家族以外との人間関係 65~69歳 男 170 56 家族以外との人間関係 65~69歳 女 256 57 家族以外との人間関係 70~74歳 男 172 58 家族以外との人間関係 70~74歳 女 297 59 家族以外との人間関係 75~79歳 男 110 60 家族以外との人間関係 75~79歳 女 181 61 家族以外との人間関係 80~84歳 男 88 62 家族以外との人間関係 80~84歳 女 134 63 家族以外との人間関係 85歳以上 男 58 64 家族以外との人間関係 85歳以上 女 106 65 恋愛・性に関すること 12~14歳 男 10 66 恋愛・性に関すること 12~14歳 女 22 67 恋愛・性に関すること 15~19歳 男 49 68 恋愛・性に関すること 15~19歳 女 61 69 恋愛・性に関すること 20~24歳 男 91 70 恋愛・性に関すること 20~24歳 女 120 71 恋愛・性に関すること 25~29歳 男 101 72 恋愛・性に関すること 25~29歳 女 129 73 恋愛・性に関すること 30~34歳 男 98 74 恋愛・性に関すること 30~34歳 女 109 75 恋愛・性に関すること 35~39歳 男 77 76 恋愛・性に関すること 35~39歳 女 84 77 恋愛・性に関すること 40~44歳 男 66 78 恋愛・性に関すること 40~44歳 女 60 79 恋愛・性に関すること 45~49歳 男 69 80 恋愛・性に関すること 45~49歳 女 48 81 恋愛・性に関すること 50~54歳 男 53 82 恋愛・性に関すること 50~54歳 女 23 83 恋愛・性に関すること 55~59歳 男 42 84 恋愛・性に関すること 55~59歳 女 13 85 恋愛・性に関すること 60~64歳 男 24 86 恋愛・性に関すること 60~64歳 女 5 87 恋愛・性に関すること 65~69歳 男 18 88 恋愛・性に関すること 65~69歳 女 1 89 恋愛・性に関すること 70~74歳 男 13 90 恋愛・性に関すること 70~74歳 女 1 91 恋愛・性に関すること 75~79歳 男 5 92 恋愛・性に関すること 75~79歳 女 1 93 恋愛・性に関すること 80~84歳 男 2 94 恋愛・性に関すること 80~84歳 女 1 95 恋愛・性に関すること 85歳以上 男 2 96 恋愛・性に関すること 85歳以上 女 0 97 結婚 12~14歳 男 0 98 結婚 12~14歳 女 0 99 結婚 15~19歳 男 2 100 結婚 15~19歳 女 3 101 結婚 20~24歳 男 24 102 結婚 20~24歳 女 41 103 結婚 25~29歳 男 63 104 結婚 25~29歳 女 112 105 結婚 30~34歳 男 78 106 結婚 30~34歳 女 114 107 結婚 35~39歳 男 79 108 結婚 35~39歳 女 110 109 結婚 40~44歳 男 73 110 結婚 40~44歳 女 55 111 結婚 45~49歳 男 82 112 結婚 45~49歳 女 42 113 結婚 50~54歳 男 56 114 結婚 50~54歳 女 20 115 結婚 55~59歳 男 37 116 結婚 55~59歳 女 11 117 結婚 60~64歳 男 21 118 結婚 60~64歳 女 8 119 結婚 65~69歳 男 10 120 結婚 65~69歳 女 4 121 結婚 70~74歳 男 6 122 結婚 70~74歳 女 3 123 結婚 75~79歳 男 5 124 結婚 75~79歳 女 4 125 結婚 80~84歳 男 0 126 結婚 80~84歳 女 0 127 結婚 85歳以上 男 1 128 結婚 85歳以上 女 2 129 離婚 12~14歳 男 0 130 離婚 12~14歳 女 1 131 離婚 15~19歳 男 0 132 離婚 15~19歳 女 0 133 離婚 20~24歳 男 2 134 離婚 20~24歳 女 1 135 離婚 25~29歳 男 5 136 離婚 25~29歳 女 8 137 離婚 30~34歳 男 7 138 離婚 30~34歳 女 16 139 離婚 35~39歳 男 19 140 離婚 35~39歳 女 19 141 離婚 40~44歳 男 17 142 離婚 40~44歳 女 25 143 離婚 45~49歳 男 19 144 離婚 45~49歳 女 29 145 離婚 50~54歳 男 15 146 離婚 50~54歳 女 26 147 離婚 55~59歳 男 13 148 離婚 55~59歳 女 16 149 離婚 60~64歳 男 12 150 離婚 60~64歳 女 13 151 離婚 65~69歳 男 7 152 離婚 65~69歳 女 4 153 離婚 70~74歳 男 5 154 離婚 70~74歳 女 4 155 離婚 75~79歳 男 5 156 離婚 75~79歳 女 4 157 離婚 80~84歳 男 2 158 離婚 80~84歳 女 2 159 離婚 85歳以上 男 0 160 離婚 85歳以上 女 2 161 いじめ、セクシュアル・ハラスメント 12~14歳 男 12 162 いじめ、セクシュアル・ハラスメント 12~14歳 女 12 163 いじめ、セクシュアル・ハラスメント 15~19歳 男 7 164 いじめ、セクシュアル・ハラスメント 15~19歳 女 11 165 いじめ、セクシュアル・ハラスメント 20~24歳 男 7 166 いじめ、セクシュアル・ハラスメント 20~24歳 女 17 167 いじめ、セクシュアル・ハラスメント 25~29歳 男 7 168 いじめ、セクシュアル・ハラスメント 25~29歳 女 18 169 いじめ、セクシュアル・ハラスメント 30~34歳 男 20 170 いじめ、セクシュアル・ハラスメント 30~34歳 女 19 171 いじめ、セクシュアル・ハラスメント 35~39歳 男 19 172 いじめ、セクシュアル・ハラスメント 35~39歳 女 25 173 いじめ、セクシュアル・ハラスメント 40~44歳 男 27 174 いじめ、セクシュアル・ハラスメント 40~44歳 女 29 175 いじめ、セクシュアル・ハラスメント 45~49歳 男 35 176 いじめ、セクシュアル・ハラスメント 45~49歳 女 33 177 いじめ、セクシュアル・ハラスメント 50~54歳 男 29 178 いじめ、セクシュアル・ハラスメント 50~54歳 女 41 179 いじめ、セクシュアル・ハラスメント 55~59歳 男 29 180 いじめ、セクシュアル・ハラスメント 55~59歳 女 38 181 いじめ、セクシュアル・ハラスメント 60~64歳 男 20 182 いじめ、セクシュアル・ハラスメント 60~64歳 女 23 183 いじめ、セクシュアル・ハラスメント 65~69歳 男 12 184 いじめ、セクシュアル・ハラスメント 65~69歳 女 24 185 いじめ、セクシュアル・ハラスメント 70~74歳 男 9 186 いじめ、セクシュアル・ハラスメント 70~74歳 女 18 187 いじめ、セクシュアル・ハラスメント 75~79歳 男 4 188 いじめ、セクシュアル・ハラスメント 75~79歳 女 12 189 いじめ、セクシュアル・ハラスメント 80~84歳 男 2 190 いじめ、セクシュアル・ハラスメント 80~84歳 女 8 191 いじめ、セクシュアル・ハラスメント 85歳以上 男 3 192 いじめ、セクシュアル・ハラスメント 85歳以上 女 6 193 生きがいに関すること 12~14歳 男 15 194 生きがいに関すること 12~14歳 女 26 195 生きがいに関すること 15~19歳 男 65 196 生きがいに関すること 15~19歳 女 83 197 生きがいに関すること 20~24歳 男 123 198 生きがいに関すること 20~24歳 女 157 199 生きがいに関すること 25~29歳 男 153 200 生きがいに関すること 25~29歳 女 164 201 生きがいに関すること 30~34歳 男 159 202 生きがいに関すること 30~34歳 女 176 203 生きがいに関すること 35~39歳 男 192 204 生きがいに関すること 35~39歳 女 193 205 生きがいに関すること 40~44歳 男 202 206 生きがいに関すること 40~44歳 女 195 207 生きがいに関すること 45~49歳 男 209 208 生きがいに関すること 45~49歳 女 243 209 生きがいに関すること 50~54歳 男 210 210 生きがいに関すること 50~54歳 女 248 211 生きがいに関すること 55~59歳 男 188 212 生きがいに関すること 55~59歳 女 230 213 生きがいに関すること 60~64歳 男 187 214 生きがいに関すること 60~64歳 女 216 215 生きがいに関すること 65~69歳 男 187 216 生きがいに関すること 65~69歳 女 231 217 生きがいに関すること 70~74歳 男 192 218 生きがいに関すること 70~74歳 女 285 219 生きがいに関すること 75~79歳 男 156 220 生きがいに関すること 75~79歳 女 204 221 生きがいに関すること 80~84歳 男 107 222 生きがいに関すること 80~84歳 女 182 223 生きがいに関すること 85歳以上 男 92 224 生きがいに関すること 85歳以上 女 175 225 自由にできる時間がないこと 12~14歳 男 23 226 自由にできる時間がないこと 12~14歳 女 32 227 自由にできる時間がないこと 15~19歳 男 50 228 自由にできる時間がないこと 15~19歳 女 78 229 自由にできる時間がないこと 20~24歳 男 72 230 自由にできる時間がないこと 20~24歳 女 105 231 自由にできる時間がないこと 25~29歳 男 94 232 自由にできる時間がないこと 25~29歳 女 120 233 自由にできる時間がないこと 30~34歳 男 143 234 自由にできる時間がないこと 30~34歳 女 214 235 自由にできる時間がないこと 35~39歳 男 158 236 自由にできる時間がないこと 35~39歳 女 247 237 自由にできる時間がないこと 40~44歳 男 169 238 自由にできる時間がないこと 40~44歳 女 253 239 自由にできる時間がないこと 45~49歳 男 177 240 自由にできる時間がないこと 45~49歳 女 245 241 自由にできる時間がないこと 50~54歳 男 152 242 自由にできる時間がないこと 50~54歳 女 211 243 自由にできる時間がないこと 55~59歳 男 105 244 自由にできる時間がないこと 55~59歳 女 179 245 自由にできる時間がないこと 60~64歳 男 86 246 自由にできる時間がないこと 60~64歳 女 136 247 自由にできる時間がないこと 65~69歳 男 67 248 自由にできる時間がないこと 65~69歳 女 130 249 自由にできる時間がないこと 70~74歳 男 59 250 自由にできる時間がないこと 70~74歳 女 115 251 自由にできる時間がないこと 75~79歳 男 35 252 自由にできる時間がないこと 75~79歳 女 99 253 自由にできる時間がないこと 80~84歳 男 24 254 自由にできる時間がないこと 80~84歳 女 54 255 自由にできる時間がないこと 85歳以上 男 18 256 自由にできる時間がないこと 85歳以上 女 33 257 収入・家計・借金等 12~14歳 男 4 258 収入・家計・借金等 12~14歳 女 6 259 収入・家計・借金等 15~19歳 男 38 260 収入・家計・借金等 15~19歳 女 60 261 収入・家計・借金等 20~24歳 男 181 262 収入・家計・借金等 20~24歳 女 247 263 収入・家計・借金等 25~29歳 男 294 264 収入・家計・借金等 25~29歳 女 377 265 収入・家計・借金等 30~34歳 男 383 266 収入・家計・借金等 30~34歳 女 480 267 収入・家計・借金等 35~39歳 男 456 268 収入・家計・借金等 35~39歳 女 588 269 収入・家計・借金等 40~44歳 男 516 270 収入・家計・借金等 40~44歳 女 685 271 収入・家計・借金等 45~49歳 男 684 272 収入・家計・借金等 45~49歳 女 844 273 収入・家計・借金等 50~54歳 男 624 274 収入・家計・借金等 50~54歳 女 860 275 収入・家計・借金等 55~59歳 男 567 276 収入・家計・借金等 55~59歳 女 713 277 収入・家計・借金等 60~64歳 男 551 278 収入・家計・借金等 60~64歳 女 585 279 収入・家計・借金等 65~69歳 男 477 280 収入・家計・借金等 65~69歳 女 492 281 収入・家計・借金等 70~74歳 男 441 282 収入・家計・借金等 70~74歳 女 490 283 収入・家計・借金等 75~79歳 男 284 284 収入・家計・借金等 75~79歳 女 286 285 収入・家計・借金等 80~84歳 男 157 286 収入・家計・借金等 80~84歳 女 198 287 収入・家計・借金等 85歳以上 男 84 288 収入・家計・借金等 85歳以上 女 123 289 自分の病気や介護 12~14歳 男 9 290 自分の病気や介護 12~14歳 女 18 291 自分の病気や介護 15~19歳 男 32 292 自分の病気や介護 15~19歳 女 42 293 自分の病気や介護 20~24歳 男 49 294 自分の病気や介護 20~24歳 女 73 295 自分の病気や介護 25~29歳 男 65 296 自分の病気や介護 25~29歳 女 112 297 自分の病気や介護 30~34歳 男 101 298 自分の病気や介護 30~34歳 女 146 299 自分の病気や介護 35~39歳 男 143 300 自分の病気や介護 35~39歳 女 211 301 自分の病気や介護 40~44歳 男 164 302 自分の病気や介護 40~44歳 女 272 303 自分の病気や介護 45~49歳 男 247 304 自分の病気や介護 45~49歳 女 375 305 自分の病気や介護 50~54歳 男 297 306 自分の病気や介護 50~54歳 女 478 307 自分の病気や介護 55~59歳 男 334 308 自分の病気や介護 55~59歳 女 469 309 自分の病気や介護 60~64歳 男 401 310 自分の病気や介護 60~64歳 女 498 311 自分の病気や介護 65~69歳 男 499 312 自分の病気や介護 65~69歳 女 600 313 自分の病気や介護 70~74歳 男 682 314 自分の病気や介護 70~74歳 女 810 315 自分の病気や介護 75~79歳 男 588 316 自分の病気や介護 75~79歳 女 726 317 自分の病気や介護 80~84歳 男 543 318 自分の病気や介護 80~84歳 女 773 319 自分の病気や介護 85歳以上 男 542 320 自分の病気や介護 85歳以上 女 1044 321 家族の病気や介護 12~14歳 男 4 322 家族の病気や介護 12~14歳 女 4 323 家族の病気や介護 15~19歳 男 7 324 家族の病気や介護 15~19歳 女 13 325 家族の病気や介護 20~24歳 男 20 326 家族の病気や介護 20~24歳 女 33 327 家族の病気や介護 25~29歳 男 40 328 家族の病気や介護 25~29歳 女 64 329 家族の病気や介護 30~34歳 男 62 330 家族の病気や介護 30~34歳 女 104 331 家族の病気や介護 35~39歳 男 91 332 家族の病気や介護 35~39歳 女 163 333 家族の病気や介護 40~44歳 男 125 334 家族の病気や介護 40~44歳 女 234 335 家族の病気や介護 45~49歳 男 212 336 家族の病気や介護 45~49歳 女 407 337 家族の病気や介護 50~54歳 男 291 338 家族の病気や介護 50~54歳 女 603 339 家族の病気や介護 55~59歳 男 339 340 家族の病気や介護 55~59歳 女 695 341 家族の病気や介護 60~64歳 男 313 342 家族の病気や介護 60~64歳 女 627 343 家族の病気や介護 65~69歳 男 286 344 家族の病気や介護 65~69歳 女 526 345 家族の病気や介護 70~74歳 男 299 346 家族の病気や介護 70~74歳 女 537 347 家族の病気や介護 75~79歳 男 251 348 家族の病気や介護 75~79歳 女 380 349 家族の病気や介護 80~84歳 男 234 350 家族の病気や介護 80~84歳 女 319 351 家族の病気や介護 85歳以上 男 211 352 家族の病気や介護 85歳以上 女 212 353 妊娠・出産 12~14歳 男 0 354 妊娠・出産 12~14歳 女 0 355 妊娠・出産 15~19歳 男 0 356 妊娠・出産 15~19歳 女 1 357 妊娠・出産 20~24歳 男 1 358 妊娠・出産 20~24歳 女 16 359 妊娠・出産 25~29歳 男 9 360 妊娠・出産 25~29歳 女 94 361 妊娠・出産 30~34歳 男 18 362 妊娠・出産 30~34歳 女 148 363 妊娠・出産 35~39歳 男 17 364 妊娠・出産 35~39歳 女 136 365 妊娠・出産 40~44歳 男 8 366 妊娠・出産 40~44歳 女 39 367 妊娠・出産 45~49歳 男 3 368 妊娠・出産 45~49歳 女 7 369 妊娠・出産 50~54歳 男 1 370 妊娠・出産 50~54歳 女 1 371 妊娠・出産 55~59歳 男 1 372 妊娠・出産 55~59歳 女 0 373 妊娠・出産 60~64歳 男 0 374 妊娠・出産 60~64歳 女 1 375 妊娠・出産 65~69歳 男 0 376 妊娠・出産 65~69歳 女 0 377 妊娠・出産 70~74歳 男 0 378 妊娠・出産 70~74歳 女 1 379 妊娠・出産 75~79歳 男 0 380 妊娠・出産 75~79歳 女 1 381 妊娠・出産 80~84歳 男 0 382 妊娠・出産 80~84歳 女 0 383 妊娠・出産 85歳以上 男 0 384 妊娠・出産 85歳以上 女 0 385 育児 12~14歳 男 0 386 育児 12~14歳 女 0 387 育児 15~19歳 男 1 388 育児 15~19歳 女 2 389 育児 20~24歳 男 2 390 育児 20~24歳 女 19 391 育児 25~29歳 男 22 392 育児 25~29歳 女 114 393 育児 30~34歳 男 95 394 育児 30~34歳 女 362 395 育児 35~39歳 男 126 396 育児 35~39歳 女 481 397 育児 40~44歳 男 107 398 育児 40~44歳 女 410 399 育児 45~49歳 男 71 400 育児 45~49歳 女 205 401 育児 50~54歳 男 27 402 育児 50~54歳 女 43 403 育児 55~59歳 男 8 404 育児 55~59歳 女 11 405 育児 60~64歳 男 2 406 育児 60~64歳 女 5 407 育児 65~69歳 男 2 408 育児 65~69歳 女 4 409 育児 70~74歳 男 1 410 育児 70~74歳 女 2 411 育児 75~79歳 男 0 412 育児 75~79歳 女 1 413 育児 80~84歳 男 0 414 育児 80~84歳 女 0 415 育児 85歳以上 男 0 416 育児 85歳以上 女 0 417 家事 12~14歳 男 1 418 家事 12~14歳 女 2 419 家事 15~19歳 男 3 420 家事 15~19歳 女 8 421 家事 20~24歳 男 10 422 家事 20~24歳 女 28 423 家事 25~29歳 男 26 424 家事 25~29歳 女 88 425 家事 30~34歳 男 57 426 家事 30~34歳 女 245 427 家事 35~39歳 男 63 428 家事 35~39歳 女 315 429 家事 40~44歳 男 57 430 家事 40~44歳 女 318 431 家事 45~49歳 男 52 432 家事 45~49歳 女 289 433 家事 50~54歳 男 40 434 家事 50~54歳 女 235 435 家事 55~59歳 男 43 436 家事 55~59歳 女 189 437 家事 60~64歳 男 30 438 家事 60~64歳 女 131 439 家事 65~69歳 男 38 440 家事 65~69歳 女 143 441 家事 70~74歳 男 48 442 家事 70~74歳 女 205 443 家事 75~79歳 男 43 444 家事 75~79歳 女 162 445 家事 80~84歳 男 39 446 家事 80~84歳 女 170 447 家事 85歳以上 男 50 448 家事 85歳以上 女 150 449 自分の学業・受験・進学 12~14歳 男 214 450 自分の学業・受験・進学 12~14歳 女 273 451 自分の学業・受験・進学 15~19歳 男 445 452 自分の学業・受験・進学 15~19歳 女 554 453 自分の学業・受験・進学 20~24歳 男 156 454 自分の学業・受験・進学 20~24歳 女 199 455 自分の学業・受験・進学 25~29歳 男 28 456 自分の学業・受験・進学 25~29歳 女 29 457 自分の学業・受験・進学 30~34歳 男 16 458 自分の学業・受験・進学 30~34歳 女 29 459 自分の学業・受験・進学 35~39歳 男 18 460 自分の学業・受験・進学 35~39歳 女 42 461 自分の学業・受験・進学 40~44歳 男 25 462 自分の学業・受験・進学 40~44歳 女 66 463 自分の学業・受験・進学 45~49歳 男 31 464 自分の学業・受験・進学 45~49歳 女 93 465 自分の学業・受験・進学 50~54歳 男 23 466 自分の学業・受験・進学 50~54歳 女 50 467 自分の学業・受験・進学 55~59歳 男 9 468 自分の学業・受験・進学 55~59歳 女 13 469 自分の学業・受験・進学 60~64歳 男 5 470 自分の学業・受験・進学 60~64歳 女 4 471 自分の学業・受験・進学 65~69歳 男 4 472 自分の学業・受験・進学 65~69歳 女 0 473 自分の学業・受験・進学 70~74歳 男 1 474 自分の学業・受験・進学 70~74歳 女 0 475 自分の学業・受験・進学 75~79歳 男 0 476 自分の学業・受験・進学 75~79歳 女 2 477 自分の学業・受験・進学 80~84歳 男 0 478 自分の学業・受験・進学 80~84歳 女 0 479 自分の学業・受験・進学 85歳以上 男 0 480 自分の学業・受験・進学 85歳以上 女 0 481 子どもの教育 12~14歳 男 0 482 子どもの教育 12~14歳 女 0 483 子どもの教育 15~19歳 男 1 484 子どもの教育 15~19歳 女 1 485 子どもの教育 20~24歳 男 2 486 子どもの教育 20~24歳 女 8 487 子どもの教育 25~29歳 男 12 488 子どもの教育 25~29歳 女 47 489 子どもの教育 30~34歳 男 63 490 子どもの教育 30~34歳 女 198 491 子どもの教育 35~39歳 男 114 492 子どもの教育 35~39歳 女 399 493 子どもの教育 40~44歳 男 193 494 子どもの教育 40~44歳 女 588 495 子どもの教育 45~49歳 男 242 496 子どもの教育 45~49歳 女 613 497 子どもの教育 50~54歳 男 155 498 子どもの教育 50~54歳 女 332 499 子どもの教育 55~59歳 男 79 500 子どもの教育 55~59歳 女 94 501 子どもの教育 60~64歳 男 39 502 子どもの教育 60~64歳 女 12 503 子どもの教育 65~69歳 男 10 504 子どもの教育 65~69歳 女 9 505 子どもの教育 70~74歳 男 10 506 子どもの教育 70~74歳 女 6 507 子どもの教育 75~79歳 男 4 508 子どもの教育 75~79歳 女 3 509 子どもの教育 80~84歳 男 1 510 子どもの教育 80~84歳 女 1 511 子どもの教育 85歳以上 男 1 512 子どもの教育 85歳以上 女 1 513 自分の仕事 12~14歳 男 2 514 自分の仕事 12~14歳 女 3 515 自分の仕事 15~19歳 男 57 516 自分の仕事 15~19歳 女 62 517 自分の仕事 20~24歳 男 309 518 自分の仕事 20~24歳 女 493 519 自分の仕事 25~29歳 男 534 520 自分の仕事 25~29歳 女 644 521 自分の仕事 30~34歳 男 719 522 自分の仕事 30~34歳 女 688 523 自分の仕事 35~39歳 男 852 524 自分の仕事 35~39歳 女 813 525 自分の仕事 40~44歳 男 1041 526 自分の仕事 40~44歳 女 860 527 自分の仕事 45~49歳 男 1249 528 自分の仕事 45~49歳 女 1061 529 自分の仕事 50~54歳 男 1128 530 自分の仕事 50~54歳 女 1018 531 自分の仕事 55~59歳 男 972 532 自分の仕事 55~59歳 女 799 533 自分の仕事 60~64歳 男 720 534 自分の仕事 60~64歳 女 514 535 自分の仕事 65~69歳 男 406 536 自分の仕事 65~69歳 女 274 537 自分の仕事 70~74歳 男 260 538 自分の仕事 70~74歳 女 154 539 自分の仕事 75~79歳 男 97 540 自分の仕事 75~79歳 女 62 541 自分の仕事 80~84歳 男 54 542 自分の仕事 80~84歳 女 39 543 自分の仕事 85歳以上 男 29 544 自分の仕事 85歳以上 女 25 545 家族の仕事 12~14歳 男 1 546 家族の仕事 12~14歳 女 2 547 家族の仕事 15~19歳 男 4 548 家族の仕事 15~19歳 女 5 549 家族の仕事 20~24歳 男 11 550 家族の仕事 20~24歳 女 15 551 家族の仕事 25~29歳 男 30 552 家族の仕事 25~29歳 女 40 553 家族の仕事 30~34歳 男 38 554 家族の仕事 30~34歳 女 68 555 家族の仕事 35~39歳 男 46 556 家族の仕事 35~39歳 女 111 557 家族の仕事 40~44歳 男 50 558 家族の仕事 40~44歳 女 123 559 家族の仕事 45~49歳 男 64 560 家族の仕事 45~49歳 女 167 561 家族の仕事 50~54歳 男 66 562 家族の仕事 50~54歳 女 205 563 家族の仕事 55~59歳 男 81 564 家族の仕事 55~59歳 女 240 565 家族の仕事 60~64歳 男 82 566 家族の仕事 60~64歳 女 170 567 家族の仕事 65~69歳 男 69 568 家族の仕事 65~69歳 女 131 569 家族の仕事 70~74歳 男 55 570 家族の仕事 70~74歳 女 120 571 家族の仕事 75~79歳 男 43 572 家族の仕事 75~79歳 女 57 573 家族の仕事 80~84歳 男 24 574 家族の仕事 80~84歳 女 54 575 家族の仕事 85歳以上 男 20 576 家族の仕事 85歳以上 女 30 577 住まいや生活環境(公害、安全及び交通事情を含む) 12~14歳 男 6 578 住まいや生活環境(公害、安全及び交通事情を含む) 12~14歳 女 11 579 住まいや生活環境(公害、安全及び交通事情を含む) 15~19歳 男 24 580 住まいや生活環境(公害、安全及び交通事情を含む) 15~19歳 女 31 581 住まいや生活環境(公害、安全及び交通事情を含む) 20~24歳 男 38 582 住まいや生活環境(公害、安全及び交通事情を含む) 20~24歳 女 62 583 住まいや生活環境(公害、安全及び交通事情を含む) 25~29歳 男 71 584 住まいや生活環境(公害、安全及び交通事情を含む) 25~29歳 女 103 585 住まいや生活環境(公害、安全及び交通事情を含む) 30~34歳 男 104 586 住まいや生活環境(公害、安全及び交通事情を含む) 30~34歳 女 167 587 住まいや生活環境(公害、安全及び交通事情を含む) 35~39歳 男 124 588 住まいや生活環境(公害、安全及び交通事情を含む) 35~39歳 女 198 589 住まいや生活環境(公害、安全及び交通事情を含む) 40~44歳 男 122 590 住まいや生活環境(公害、安全及び交通事情を含む) 40~44歳 女 221 591 住まいや生活環境(公害、安全及び交通事情を含む) 45~49歳 男 169 592 住まいや生活環境(公害、安全及び交通事情を含む) 45~49歳 女 237 593 住まいや生活環境(公害、安全及び交通事情を含む) 50~54歳 男 163 594 住まいや生活環境(公害、安全及び交通事情を含む) 50~54歳 女 277 595 住まいや生活環境(公害、安全及び交通事情を含む) 55~59歳 男 157 596 住まいや生活環境(公害、安全及び交通事情を含む) 55~59歳 女 262 597 住まいや生活環境(公害、安全及び交通事情を含む) 60~64歳 男 152 598 住まいや生活環境(公害、安全及び交通事情を含む) 60~64歳 女 252 599 住まいや生活環境(公害、安全及び交通事情を含む) 65~69歳 男 161 600 住まいや生活環境(公害、安全及び交通事情を含む) 65~69歳 女 249 601 住まいや生活環境(公害、安全及び交通事情を含む) 70~74歳 男 178 602 住まいや生活環境(公害、安全及び交通事情を含む) 70~74歳 女 259 603 住まいや生活環境(公害、安全及び交通事情を含む) 75~79歳 男 116 604 住まいや生活環境(公害、安全及び交通事情を含む) 75~79歳 女 186 605 住まいや生活環境(公害、安全及び交通事情を含む) 80~84歳 男 80 606 住まいや生活環境(公害、安全及び交通事情を含む) 80~84歳 女 158 607 住まいや生活環境(公害、安全及び交通事情を含む) 85歳以上 男 79 608 住まいや生活環境(公害、安全及び交通事情を含む) 85歳以上 女 124
男性のみ抽出する。
nayami_m <- nayami |> filter(gender == "男") |> print(n=Inf, width = Inf)
# A tibble: 304 × 4 nayami agelevel gender value <chr> <chr> <chr> <dbl> 1 家族との人間関係 12~14歳 男 46 2 家族との人間関係 15~19歳 男 77 3 家族との人間関係 20~24歳 男 72 4 家族との人間関係 25~29歳 男 94 5 家族との人間関係 30~34歳 男 137 6 家族との人間関係 35~39歳 男 174 7 家族との人間関係 40~44歳 男 215 8 家族との人間関係 45~49歳 男 265 9 家族との人間関係 50~54歳 男 232 10 家族との人間関係 55~59歳 男 210 11 家族との人間関係 60~64歳 男 208 12 家族との人間関係 65~69歳 男 200 13 家族との人間関係 70~74歳 男 211 14 家族との人間関係 75~79歳 男 181 15 家族との人間関係 80~84歳 男 152 16 家族との人間関係 85歳以上 男 118 17 家族以外との人間関係 12~14歳 男 88 18 家族以外との人間関係 15~19歳 男 141 19 家族以外との人間関係 20~24歳 男 135 20 家族以外との人間関係 25~29歳 男 150 21 家族以外との人間関係 30~34歳 男 211 22 家族以外との人間関係 35~39歳 男 242 23 家族以外との人間関係 40~44歳 男 284 24 家族以外との人間関係 45~49歳 男 357 25 家族以外との人間関係 50~54歳 男 329 26 家族以外との人間関係 55~59歳 男 265 27 家族以外との人間関係 60~64歳 男 243 28 家族以外との人間関係 65~69歳 男 170 29 家族以外との人間関係 70~74歳 男 172 30 家族以外との人間関係 75~79歳 男 110 31 家族以外との人間関係 80~84歳 男 88 32 家族以外との人間関係 85歳以上 男 58 33 恋愛・性に関すること 12~14歳 男 10 34 恋愛・性に関すること 15~19歳 男 49 35 恋愛・性に関すること 20~24歳 男 91 36 恋愛・性に関すること 25~29歳 男 101 37 恋愛・性に関すること 30~34歳 男 98 38 恋愛・性に関すること 35~39歳 男 77 39 恋愛・性に関すること 40~44歳 男 66 40 恋愛・性に関すること 45~49歳 男 69 41 恋愛・性に関すること 50~54歳 男 53 42 恋愛・性に関すること 55~59歳 男 42 43 恋愛・性に関すること 60~64歳 男 24 44 恋愛・性に関すること 65~69歳 男 18 45 恋愛・性に関すること 70~74歳 男 13 46 恋愛・性に関すること 75~79歳 男 5 47 恋愛・性に関すること 80~84歳 男 2 48 恋愛・性に関すること 85歳以上 男 2 49 結婚 12~14歳 男 0 50 結婚 15~19歳 男 2 51 結婚 20~24歳 男 24 52 結婚 25~29歳 男 63 53 結婚 30~34歳 男 78 54 結婚 35~39歳 男 79 55 結婚 40~44歳 男 73 56 結婚 45~49歳 男 82 57 結婚 50~54歳 男 56 58 結婚 55~59歳 男 37 59 結婚 60~64歳 男 21 60 結婚 65~69歳 男 10 61 結婚 70~74歳 男 6 62 結婚 75~79歳 男 5 63 結婚 80~84歳 男 0 64 結婚 85歳以上 男 1 65 離婚 12~14歳 男 0 66 離婚 15~19歳 男 0 67 離婚 20~24歳 男 2 68 離婚 25~29歳 男 5 69 離婚 30~34歳 男 7 70 離婚 35~39歳 男 19 71 離婚 40~44歳 男 17 72 離婚 45~49歳 男 19 73 離婚 50~54歳 男 15 74 離婚 55~59歳 男 13 75 離婚 60~64歳 男 12 76 離婚 65~69歳 男 7 77 離婚 70~74歳 男 5 78 離婚 75~79歳 男 5 79 離婚 80~84歳 男 2 80 離婚 85歳以上 男 0 81 いじめ、セクシュアル・ハラスメント 12~14歳 男 12 82 いじめ、セクシュアル・ハラスメント 15~19歳 男 7 83 いじめ、セクシュアル・ハラスメント 20~24歳 男 7 84 いじめ、セクシュアル・ハラスメント 25~29歳 男 7 85 いじめ、セクシュアル・ハラスメント 30~34歳 男 20 86 いじめ、セクシュアル・ハラスメント 35~39歳 男 19 87 いじめ、セクシュアル・ハラスメント 40~44歳 男 27 88 いじめ、セクシュアル・ハラスメント 45~49歳 男 35 89 いじめ、セクシュアル・ハラスメント 50~54歳 男 29 90 いじめ、セクシュアル・ハラスメント 55~59歳 男 29 91 いじめ、セクシュアル・ハラスメント 60~64歳 男 20 92 いじめ、セクシュアル・ハラスメント 65~69歳 男 12 93 いじめ、セクシュアル・ハラスメント 70~74歳 男 9 94 いじめ、セクシュアル・ハラスメント 75~79歳 男 4 95 いじめ、セクシュアル・ハラスメント 80~84歳 男 2 96 いじめ、セクシュアル・ハラスメント 85歳以上 男 3 97 生きがいに関すること 12~14歳 男 15 98 生きがいに関すること 15~19歳 男 65 99 生きがいに関すること 20~24歳 男 123 100 生きがいに関すること 25~29歳 男 153 101 生きがいに関すること 30~34歳 男 159 102 生きがいに関すること 35~39歳 男 192 103 生きがいに関すること 40~44歳 男 202 104 生きがいに関すること 45~49歳 男 209 105 生きがいに関すること 50~54歳 男 210 106 生きがいに関すること 55~59歳 男 188 107 生きがいに関すること 60~64歳 男 187 108 生きがいに関すること 65~69歳 男 187 109 生きがいに関すること 70~74歳 男 192 110 生きがいに関すること 75~79歳 男 156 111 生きがいに関すること 80~84歳 男 107 112 生きがいに関すること 85歳以上 男 92 113 自由にできる時間がないこと 12~14歳 男 23 114 自由にできる時間がないこと 15~19歳 男 50 115 自由にできる時間がないこと 20~24歳 男 72 116 自由にできる時間がないこと 25~29歳 男 94 117 自由にできる時間がないこと 30~34歳 男 143 118 自由にできる時間がないこと 35~39歳 男 158 119 自由にできる時間がないこと 40~44歳 男 169 120 自由にできる時間がないこと 45~49歳 男 177 121 自由にできる時間がないこと 50~54歳 男 152 122 自由にできる時間がないこと 55~59歳 男 105 123 自由にできる時間がないこと 60~64歳 男 86 124 自由にできる時間がないこと 65~69歳 男 67 125 自由にできる時間がないこと 70~74歳 男 59 126 自由にできる時間がないこと 75~79歳 男 35 127 自由にできる時間がないこと 80~84歳 男 24 128 自由にできる時間がないこと 85歳以上 男 18 129 収入・家計・借金等 12~14歳 男 4 130 収入・家計・借金等 15~19歳 男 38 131 収入・家計・借金等 20~24歳 男 181 132 収入・家計・借金等 25~29歳 男 294 133 収入・家計・借金等 30~34歳 男 383 134 収入・家計・借金等 35~39歳 男 456 135 収入・家計・借金等 40~44歳 男 516 136 収入・家計・借金等 45~49歳 男 684 137 収入・家計・借金等 50~54歳 男 624 138 収入・家計・借金等 55~59歳 男 567 139 収入・家計・借金等 60~64歳 男 551 140 収入・家計・借金等 65~69歳 男 477 141 収入・家計・借金等 70~74歳 男 441 142 収入・家計・借金等 75~79歳 男 284 143 収入・家計・借金等 80~84歳 男 157 144 収入・家計・借金等 85歳以上 男 84 145 自分の病気や介護 12~14歳 男 9 146 自分の病気や介護 15~19歳 男 32 147 自分の病気や介護 20~24歳 男 49 148 自分の病気や介護 25~29歳 男 65 149 自分の病気や介護 30~34歳 男 101 150 自分の病気や介護 35~39歳 男 143 151 自分の病気や介護 40~44歳 男 164 152 自分の病気や介護 45~49歳 男 247 153 自分の病気や介護 50~54歳 男 297 154 自分の病気や介護 55~59歳 男 334 155 自分の病気や介護 60~64歳 男 401 156 自分の病気や介護 65~69歳 男 499 157 自分の病気や介護 70~74歳 男 682 158 自分の病気や介護 75~79歳 男 588 159 自分の病気や介護 80~84歳 男 543 160 自分の病気や介護 85歳以上 男 542 161 家族の病気や介護 12~14歳 男 4 162 家族の病気や介護 15~19歳 男 7 163 家族の病気や介護 20~24歳 男 20 164 家族の病気や介護 25~29歳 男 40 165 家族の病気や介護 30~34歳 男 62 166 家族の病気や介護 35~39歳 男 91 167 家族の病気や介護 40~44歳 男 125 168 家族の病気や介護 45~49歳 男 212 169 家族の病気や介護 50~54歳 男 291 170 家族の病気や介護 55~59歳 男 339 171 家族の病気や介護 60~64歳 男 313 172 家族の病気や介護 65~69歳 男 286 173 家族の病気や介護 70~74歳 男 299 174 家族の病気や介護 75~79歳 男 251 175 家族の病気や介護 80~84歳 男 234 176 家族の病気や介護 85歳以上 男 211 177 妊娠・出産 12~14歳 男 0 178 妊娠・出産 15~19歳 男 0 179 妊娠・出産 20~24歳 男 1 180 妊娠・出産 25~29歳 男 9 181 妊娠・出産 30~34歳 男 18 182 妊娠・出産 35~39歳 男 17 183 妊娠・出産 40~44歳 男 8 184 妊娠・出産 45~49歳 男 3 185 妊娠・出産 50~54歳 男 1 186 妊娠・出産 55~59歳 男 1 187 妊娠・出産 60~64歳 男 0 188 妊娠・出産 65~69歳 男 0 189 妊娠・出産 70~74歳 男 0 190 妊娠・出産 75~79歳 男 0 191 妊娠・出産 80~84歳 男 0 192 妊娠・出産 85歳以上 男 0 193 育児 12~14歳 男 0 194 育児 15~19歳 男 1 195 育児 20~24歳 男 2 196 育児 25~29歳 男 22 197 育児 30~34歳 男 95 198 育児 35~39歳 男 126 199 育児 40~44歳 男 107 200 育児 45~49歳 男 71 201 育児 50~54歳 男 27 202 育児 55~59歳 男 8 203 育児 60~64歳 男 2 204 育児 65~69歳 男 2 205 育児 70~74歳 男 1 206 育児 75~79歳 男 0 207 育児 80~84歳 男 0 208 育児 85歳以上 男 0 209 家事 12~14歳 男 1 210 家事 15~19歳 男 3 211 家事 20~24歳 男 10 212 家事 25~29歳 男 26 213 家事 30~34歳 男 57 214 家事 35~39歳 男 63 215 家事 40~44歳 男 57 216 家事 45~49歳 男 52 217 家事 50~54歳 男 40 218 家事 55~59歳 男 43 219 家事 60~64歳 男 30 220 家事 65~69歳 男 38 221 家事 70~74歳 男 48 222 家事 75~79歳 男 43 223 家事 80~84歳 男 39 224 家事 85歳以上 男 50 225 自分の学業・受験・進学 12~14歳 男 214 226 自分の学業・受験・進学 15~19歳 男 445 227 自分の学業・受験・進学 20~24歳 男 156 228 自分の学業・受験・進学 25~29歳 男 28 229 自分の学業・受験・進学 30~34歳 男 16 230 自分の学業・受験・進学 35~39歳 男 18 231 自分の学業・受験・進学 40~44歳 男 25 232 自分の学業・受験・進学 45~49歳 男 31 233 自分の学業・受験・進学 50~54歳 男 23 234 自分の学業・受験・進学 55~59歳 男 9 235 自分の学業・受験・進学 60~64歳 男 5 236 自分の学業・受験・進学 65~69歳 男 4 237 自分の学業・受験・進学 70~74歳 男 1 238 自分の学業・受験・進学 75~79歳 男 0 239 自分の学業・受験・進学 80~84歳 男 0 240 自分の学業・受験・進学 85歳以上 男 0 241 子どもの教育 12~14歳 男 0 242 子どもの教育 15~19歳 男 1 243 子どもの教育 20~24歳 男 2 244 子どもの教育 25~29歳 男 12 245 子どもの教育 30~34歳 男 63 246 子どもの教育 35~39歳 男 114 247 子どもの教育 40~44歳 男 193 248 子どもの教育 45~49歳 男 242 249 子どもの教育 50~54歳 男 155 250 子どもの教育 55~59歳 男 79 251 子どもの教育 60~64歳 男 39 252 子どもの教育 65~69歳 男 10 253 子どもの教育 70~74歳 男 10 254 子どもの教育 75~79歳 男 4 255 子どもの教育 80~84歳 男 1 256 子どもの教育 85歳以上 男 1 257 自分の仕事 12~14歳 男 2 258 自分の仕事 15~19歳 男 57 259 自分の仕事 20~24歳 男 309 260 自分の仕事 25~29歳 男 534 261 自分の仕事 30~34歳 男 719 262 自分の仕事 35~39歳 男 852 263 自分の仕事 40~44歳 男 1041 264 自分の仕事 45~49歳 男 1249 265 自分の仕事 50~54歳 男 1128 266 自分の仕事 55~59歳 男 972 267 自分の仕事 60~64歳 男 720 268 自分の仕事 65~69歳 男 406 269 自分の仕事 70~74歳 男 260 270 自分の仕事 75~79歳 男 97 271 自分の仕事 80~84歳 男 54 272 自分の仕事 85歳以上 男 29 273 家族の仕事 12~14歳 男 1 274 家族の仕事 15~19歳 男 4 275 家族の仕事 20~24歳 男 11 276 家族の仕事 25~29歳 男 30 277 家族の仕事 30~34歳 男 38 278 家族の仕事 35~39歳 男 46 279 家族の仕事 40~44歳 男 50 280 家族の仕事 45~49歳 男 64 281 家族の仕事 50~54歳 男 66 282 家族の仕事 55~59歳 男 81 283 家族の仕事 60~64歳 男 82 284 家族の仕事 65~69歳 男 69 285 家族の仕事 70~74歳 男 55 286 家族の仕事 75~79歳 男 43 287 家族の仕事 80~84歳 男 24 288 家族の仕事 85歳以上 男 20 289 住まいや生活環境(公害、安全及び交通事情を含む) 12~14歳 男 6 290 住まいや生活環境(公害、安全及び交通事情を含む) 15~19歳 男 24 291 住まいや生活環境(公害、安全及び交通事情を含む) 20~24歳 男 38 292 住まいや生活環境(公害、安全及び交通事情を含む) 25~29歳 男 71 293 住まいや生活環境(公害、安全及び交通事情を含む) 30~34歳 男 104 294 住まいや生活環境(公害、安全及び交通事情を含む) 35~39歳 男 124 295 住まいや生活環境(公害、安全及び交通事情を含む) 40~44歳 男 122 296 住まいや生活環境(公害、安全及び交通事情を含む) 45~49歳 男 169 297 住まいや生活環境(公害、安全及び交通事情を含む) 50~54歳 男 163 298 住まいや生活環境(公害、安全及び交通事情を含む) 55~59歳 男 157 299 住まいや生活環境(公害、安全及び交通事情を含む) 60~64歳 男 152 300 住まいや生活環境(公害、安全及び交通事情を含む) 65~69歳 男 161 301 住まいや生活環境(公害、安全及び交通事情を含む) 70~74歳 男 178 302 住まいや生活環境(公害、安全及び交通事情を含む) 75~79歳 男 116 303 住まいや生活環境(公害、安全及び交通事情を含む) 80~84歳 男 80 304 住まいや生活環境(公害、安全及び交通事情を含む) 85歳以上 男 79
面グラフとして描画する。
cate_names <- unique(nayami_m$nayami) my_colors <- palette36.colors(length(cate_names)) # 最大36色まで視認性の高い色を自動生成 names(my_colors) <- cate_names nayami_m |> mutate(nayami = fct_rev(nayami)) |> ggplot(aes(x = agelevel, y = value, fill = nayami, group = nayami)) + geom_area(position = "fill") + scale_fill_manual(values = my_colors) + scale_y_continuous(labels = scales::percent_format()) + labs(title = "令和4年国民生活基礎調査 悩みやストレスの原因(複数回答)年齢(5歳階級)別 男性 ", x = "年齢階級", y = "割合", fill = "カテゴリ") + coord_flip() + # 縦横入れ替え guides(fill = guide_legend(reverse = TRUE)) + # 凡例表示を逆順に theme_minimal()+ theme(legend.position = "top") # 凡例をグラフの上に
つづいて女性版の作成を行う。
nayami_f <- nayami |> filter(gender == "女") |> print(n=Inf, width = Inf)
# A tibble: 304 × 4 nayami agelevel gender value <chr> <chr> <chr> <dbl> 1 家族との人間関係 12~14歳 女 64 2 家族との人間関係 15~19歳 女 107 3 家族との人間関係 20~24歳 女 125 4 家族との人間関係 25~29歳 女 153 5 家族との人間関係 30~34歳 女 232 6 家族との人間関係 35~39歳 女 335 7 家族との人間関係 40~44歳 女 385 8 家族との人間関係 45~49歳 女 509 9 家族との人間関係 50~54歳 女 520 10 家族との人間関係 55~59歳 女 490 11 家族との人間関係 60~64歳 女 419 12 家族との人間関係 65~69歳 女 457 13 家族との人間関係 70~74歳 女 463 14 家族との人間関係 75~79歳 女 315 15 家族との人間関係 80~84歳 女 265 16 家族との人間関係 85歳以上 女 238 17 家族以外との人間関係 12~14歳 女 169 18 家族以外との人間関係 15~19歳 女 289 19 家族以外との人間関係 20~24歳 女 234 20 家族以外との人間関係 25~29歳 女 249 21 家族以外との人間関係 30~34歳 女 280 22 家族以外との人間関係 35~39歳 女 340 23 家族以外との人間関係 40~44歳 女 372 24 家族以外との人間関係 45~49歳 女 483 25 家族以外との人間関係 50~54歳 女 489 26 家族以外との人間関係 55~59歳 女 425 27 家族以外との人間関係 60~64歳 女 327 28 家族以外との人間関係 65~69歳 女 256 29 家族以外との人間関係 70~74歳 女 297 30 家族以外との人間関係 75~79歳 女 181 31 家族以外との人間関係 80~84歳 女 134 32 家族以外との人間関係 85歳以上 女 106 33 恋愛・性に関すること 12~14歳 女 22 34 恋愛・性に関すること 15~19歳 女 61 35 恋愛・性に関すること 20~24歳 女 120 36 恋愛・性に関すること 25~29歳 女 129 37 恋愛・性に関すること 30~34歳 女 109 38 恋愛・性に関すること 35~39歳 女 84 39 恋愛・性に関すること 40~44歳 女 60 40 恋愛・性に関すること 45~49歳 女 48 41 恋愛・性に関すること 50~54歳 女 23 42 恋愛・性に関すること 55~59歳 女 13 43 恋愛・性に関すること 60~64歳 女 5 44 恋愛・性に関すること 65~69歳 女 1 45 恋愛・性に関すること 70~74歳 女 1 46 恋愛・性に関すること 75~79歳 女 1 47 恋愛・性に関すること 80~84歳 女 1 48 恋愛・性に関すること 85歳以上 女 0 49 結婚 12~14歳 女 0 50 結婚 15~19歳 女 3 51 結婚 20~24歳 女 41 52 結婚 25~29歳 女 112 53 結婚 30~34歳 女 114 54 結婚 35~39歳 女 110 55 結婚 40~44歳 女 55 56 結婚 45~49歳 女 42 57 結婚 50~54歳 女 20 58 結婚 55~59歳 女 11 59 結婚 60~64歳 女 8 60 結婚 65~69歳 女 4 61 結婚 70~74歳 女 3 62 結婚 75~79歳 女 4 63 結婚 80~84歳 女 0 64 結婚 85歳以上 女 2 65 離婚 12~14歳 女 1 66 離婚 15~19歳 女 0 67 離婚 20~24歳 女 1 68 離婚 25~29歳 女 8 69 離婚 30~34歳 女 16 70 離婚 35~39歳 女 19 71 離婚 40~44歳 女 25 72 離婚 45~49歳 女 29 73 離婚 50~54歳 女 26 74 離婚 55~59歳 女 16 75 離婚 60~64歳 女 13 76 離婚 65~69歳 女 4 77 離婚 70~74歳 女 4 78 離婚 75~79歳 女 4 79 離婚 80~84歳 女 2 80 離婚 85歳以上 女 2 81 いじめ、セクシュアル・ハラスメント 12~14歳 女 12 82 いじめ、セクシュアル・ハラスメント 15~19歳 女 11 83 いじめ、セクシュアル・ハラスメント 20~24歳 女 17 84 いじめ、セクシュアル・ハラスメント 25~29歳 女 18 85 いじめ、セクシュアル・ハラスメント 30~34歳 女 19 86 いじめ、セクシュアル・ハラスメント 35~39歳 女 25 87 いじめ、セクシュアル・ハラスメント 40~44歳 女 29 88 いじめ、セクシュアル・ハラスメント 45~49歳 女 33 89 いじめ、セクシュアル・ハラスメント 50~54歳 女 41 90 いじめ、セクシュアル・ハラスメント 55~59歳 女 38 91 いじめ、セクシュアル・ハラスメント 60~64歳 女 23 92 いじめ、セクシュアル・ハラスメント 65~69歳 女 24 93 いじめ、セクシュアル・ハラスメント 70~74歳 女 18 94 いじめ、セクシュアル・ハラスメント 75~79歳 女 12 95 いじめ、セクシュアル・ハラスメント 80~84歳 女 8 96 いじめ、セクシュアル・ハラスメント 85歳以上 女 6 97 生きがいに関すること 12~14歳 女 26 98 生きがいに関すること 15~19歳 女 83 99 生きがいに関すること 20~24歳 女 157 100 生きがいに関すること 25~29歳 女 164 101 生きがいに関すること 30~34歳 女 176 102 生きがいに関すること 35~39歳 女 193 103 生きがいに関すること 40~44歳 女 195 104 生きがいに関すること 45~49歳 女 243 105 生きがいに関すること 50~54歳 女 248 106 生きがいに関すること 55~59歳 女 230 107 生きがいに関すること 60~64歳 女 216 108 生きがいに関すること 65~69歳 女 231 109 生きがいに関すること 70~74歳 女 285 110 生きがいに関すること 75~79歳 女 204 111 生きがいに関すること 80~84歳 女 182 112 生きがいに関すること 85歳以上 女 175 113 自由にできる時間がないこと 12~14歳 女 32 114 自由にできる時間がないこと 15~19歳 女 78 115 自由にできる時間がないこと 20~24歳 女 105 116 自由にできる時間がないこと 25~29歳 女 120 117 自由にできる時間がないこと 30~34歳 女 214 118 自由にできる時間がないこと 35~39歳 女 247 119 自由にできる時間がないこと 40~44歳 女 253 120 自由にできる時間がないこと 45~49歳 女 245 121 自由にできる時間がないこと 50~54歳 女 211 122 自由にできる時間がないこと 55~59歳 女 179 123 自由にできる時間がないこと 60~64歳 女 136 124 自由にできる時間がないこと 65~69歳 女 130 125 自由にできる時間がないこと 70~74歳 女 115 126 自由にできる時間がないこと 75~79歳 女 99 127 自由にできる時間がないこと 80~84歳 女 54 128 自由にできる時間がないこと 85歳以上 女 33 129 収入・家計・借金等 12~14歳 女 6 130 収入・家計・借金等 15~19歳 女 60 131 収入・家計・借金等 20~24歳 女 247 132 収入・家計・借金等 25~29歳 女 377 133 収入・家計・借金等 30~34歳 女 480 134 収入・家計・借金等 35~39歳 女 588 135 収入・家計・借金等 40~44歳 女 685 136 収入・家計・借金等 45~49歳 女 844 137 収入・家計・借金等 50~54歳 女 860 138 収入・家計・借金等 55~59歳 女 713 139 収入・家計・借金等 60~64歳 女 585 140 収入・家計・借金等 65~69歳 女 492 141 収入・家計・借金等 70~74歳 女 490 142 収入・家計・借金等 75~79歳 女 286 143 収入・家計・借金等 80~84歳 女 198 144 収入・家計・借金等 85歳以上 女 123 145 自分の病気や介護 12~14歳 女 18 146 自分の病気や介護 15~19歳 女 42 147 自分の病気や介護 20~24歳 女 73 148 自分の病気や介護 25~29歳 女 112 149 自分の病気や介護 30~34歳 女 146 150 自分の病気や介護 35~39歳 女 211 151 自分の病気や介護 40~44歳 女 272 152 自分の病気や介護 45~49歳 女 375 153 自分の病気や介護 50~54歳 女 478 154 自分の病気や介護 55~59歳 女 469 155 自分の病気や介護 60~64歳 女 498 156 自分の病気や介護 65~69歳 女 600 157 自分の病気や介護 70~74歳 女 810 158 自分の病気や介護 75~79歳 女 726 159 自分の病気や介護 80~84歳 女 773 160 自分の病気や介護 85歳以上 女 1044 161 家族の病気や介護 12~14歳 女 4 162 家族の病気や介護 15~19歳 女 13 163 家族の病気や介護 20~24歳 女 33 164 家族の病気や介護 25~29歳 女 64 165 家族の病気や介護 30~34歳 女 104 166 家族の病気や介護 35~39歳 女 163 167 家族の病気や介護 40~44歳 女 234 168 家族の病気や介護 45~49歳 女 407 169 家族の病気や介護 50~54歳 女 603 170 家族の病気や介護 55~59歳 女 695 171 家族の病気や介護 60~64歳 女 627 172 家族の病気や介護 65~69歳 女 526 173 家族の病気や介護 70~74歳 女 537 174 家族の病気や介護 75~79歳 女 380 175 家族の病気や介護 80~84歳 女 319 176 家族の病気や介護 85歳以上 女 212 177 妊娠・出産 12~14歳 女 0 178 妊娠・出産 15~19歳 女 1 179 妊娠・出産 20~24歳 女 16 180 妊娠・出産 25~29歳 女 94 181 妊娠・出産 30~34歳 女 148 182 妊娠・出産 35~39歳 女 136 183 妊娠・出産 40~44歳 女 39 184 妊娠・出産 45~49歳 女 7 185 妊娠・出産 50~54歳 女 1 186 妊娠・出産 55~59歳 女 0 187 妊娠・出産 60~64歳 女 1 188 妊娠・出産 65~69歳 女 0 189 妊娠・出産 70~74歳 女 1 190 妊娠・出産 75~79歳 女 1 191 妊娠・出産 80~84歳 女 0 192 妊娠・出産 85歳以上 女 0 193 育児 12~14歳 女 0 194 育児 15~19歳 女 2 195 育児 20~24歳 女 19 196 育児 25~29歳 女 114 197 育児 30~34歳 女 362 198 育児 35~39歳 女 481 199 育児 40~44歳 女 410 200 育児 45~49歳 女 205 201 育児 50~54歳 女 43 202 育児 55~59歳 女 11 203 育児 60~64歳 女 5 204 育児 65~69歳 女 4 205 育児 70~74歳 女 2 206 育児 75~79歳 女 1 207 育児 80~84歳 女 0 208 育児 85歳以上 女 0 209 家事 12~14歳 女 2 210 家事 15~19歳 女 8 211 家事 20~24歳 女 28 212 家事 25~29歳 女 88 213 家事 30~34歳 女 245 214 家事 35~39歳 女 315 215 家事 40~44歳 女 318 216 家事 45~49歳 女 289 217 家事 50~54歳 女 235 218 家事 55~59歳 女 189 219 家事 60~64歳 女 131 220 家事 65~69歳 女 143 221 家事 70~74歳 女 205 222 家事 75~79歳 女 162 223 家事 80~84歳 女 170 224 家事 85歳以上 女 150 225 自分の学業・受験・進学 12~14歳 女 273 226 自分の学業・受験・進学 15~19歳 女 554 227 自分の学業・受験・進学 20~24歳 女 199 228 自分の学業・受験・進学 25~29歳 女 29 229 自分の学業・受験・進学 30~34歳 女 29 230 自分の学業・受験・進学 35~39歳 女 42 231 自分の学業・受験・進学 40~44歳 女 66 232 自分の学業・受験・進学 45~49歳 女 93 233 自分の学業・受験・進学 50~54歳 女 50 234 自分の学業・受験・進学 55~59歳 女 13 235 自分の学業・受験・進学 60~64歳 女 4 236 自分の学業・受験・進学 65~69歳 女 0 237 自分の学業・受験・進学 70~74歳 女 0 238 自分の学業・受験・進学 75~79歳 女 2 239 自分の学業・受験・進学 80~84歳 女 0 240 自分の学業・受験・進学 85歳以上 女 0 241 子どもの教育 12~14歳 女 0 242 子どもの教育 15~19歳 女 1 243 子どもの教育 20~24歳 女 8 244 子どもの教育 25~29歳 女 47 245 子どもの教育 30~34歳 女 198 246 子どもの教育 35~39歳 女 399 247 子どもの教育 40~44歳 女 588 248 子どもの教育 45~49歳 女 613 249 子どもの教育 50~54歳 女 332 250 子どもの教育 55~59歳 女 94 251 子どもの教育 60~64歳 女 12 252 子どもの教育 65~69歳 女 9 253 子どもの教育 70~74歳 女 6 254 子どもの教育 75~79歳 女 3 255 子どもの教育 80~84歳 女 1 256 子どもの教育 85歳以上 女 1 257 自分の仕事 12~14歳 女 3 258 自分の仕事 15~19歳 女 62 259 自分の仕事 20~24歳 女 493 260 自分の仕事 25~29歳 女 644 261 自分の仕事 30~34歳 女 688 262 自分の仕事 35~39歳 女 813 263 自分の仕事 40~44歳 女 860 264 自分の仕事 45~49歳 女 1061 265 自分の仕事 50~54歳 女 1018 266 自分の仕事 55~59歳 女 799 267 自分の仕事 60~64歳 女 514 268 自分の仕事 65~69歳 女 274 269 自分の仕事 70~74歳 女 154 270 自分の仕事 75~79歳 女 62 271 自分の仕事 80~84歳 女 39 272 自分の仕事 85歳以上 女 25 273 家族の仕事 12~14歳 女 2 274 家族の仕事 15~19歳 女 5 275 家族の仕事 20~24歳 女 15 276 家族の仕事 25~29歳 女 40 277 家族の仕事 30~34歳 女 68 278 家族の仕事 35~39歳 女 111 279 家族の仕事 40~44歳 女 123 280 家族の仕事 45~49歳 女 167 281 家族の仕事 50~54歳 女 205 282 家族の仕事 55~59歳 女 240 283 家族の仕事 60~64歳 女 170 284 家族の仕事 65~69歳 女 131 285 家族の仕事 70~74歳 女 120 286 家族の仕事 75~79歳 女 57 287 家族の仕事 80~84歳 女 54 288 家族の仕事 85歳以上 女 30 289 住まいや生活環境(公害、安全及び交通事情を含む) 12~14歳 女 11 290 住まいや生活環境(公害、安全及び交通事情を含む) 15~19歳 女 31 291 住まいや生活環境(公害、安全及び交通事情を含む) 20~24歳 女 62 292 住まいや生活環境(公害、安全及び交通事情を含む) 25~29歳 女 103 293 住まいや生活環境(公害、安全及び交通事情を含む) 30~34歳 女 167 294 住まいや生活環境(公害、安全及び交通事情を含む) 35~39歳 女 198 295 住まいや生活環境(公害、安全及び交通事情を含む) 40~44歳 女 221 296 住まいや生活環境(公害、安全及び交通事情を含む) 45~49歳 女 237 297 住まいや生活環境(公害、安全及び交通事情を含む) 50~54歳 女 277 298 住まいや生活環境(公害、安全及び交通事情を含む) 55~59歳 女 262 299 住まいや生活環境(公害、安全及び交通事情を含む) 60~64歳 女 252 300 住まいや生活環境(公害、安全及び交通事情を含む) 65~69歳 女 249 301 住まいや生活環境(公害、安全及び交通事情を含む) 70~74歳 女 259 302 住まいや生活環境(公害、安全及び交通事情を含む) 75~79歳 女 186 303 住まいや生活環境(公害、安全及び交通事情を含む) 80~84歳 女 158 304 住まいや生活環境(公害、安全及び交通事情を含む) 85歳以上 女 124
男性版と同様に面グラフを描画する。
cate_names <- unique(nayami_f$nayami) my_colors <- palette36.colors(length(cate_names)) # 最大36色まで視認性の高い色を自動生成 names(my_colors) <- cate_names nayami_f |> mutate(nayami = fct_rev(nayami)) |> ggplot(aes(x = agelevel, y = value, fill = nayami, group = nayami)) + geom_area(position = "fill") + scale_fill_manual(values = my_colors) + scale_y_continuous(labels = scales::percent_format()) + labs(title = "令和4年国民生活基礎調査 悩みやストレスの原因(複数回答)年齢(5歳階級)別 女性 ", x = "年齢階級", y = "割合", fill = "カテゴリ") + coord_flip() + # 縦横入れ替え guides(fill = guide_legend(reverse = TRUE)) + # 凡例表示を逆順に theme_minimal()+ theme(legend.position = "top") # 凡例をグラフの上に
並べて比較したいので男性版を再掲する。
男性は特に仕事や収入など、経済的なところが割合が大きい。
コメント