library(haven)
data <- read_sav("~/Desktop/draft/作業研究/民主基金會2025調查_臺灣民主價值與治理/PP259762.sav")
library(stringr)
library(tidyr)台灣各縣市民眾對民主意涵認同與其意識形態延伸對中國、美國看法
使用民主基金會2025調查＿台灣民主價值與治理資料
研究主題 : 台灣各縣市民眾對民主意涵認同與其意識形態延伸對中國、美國看法
隨著全球民主體系面臨挑戰與轉型，台灣的民主發展成為亞洲地區的重要觀察對象。民眾對民主制度的支持與信任，長期被視為民主穩定的重要基礎。然而，在後川普時代的國際局勢下，美中對抗加劇、台海局勢日益複雜，台灣社會對「民主意涵」的認同可能不僅影響國內政治態度，也形塑民眾對外部強權的情感與政策偏好。特別是，美國作為台灣主要的安全與經貿夥伴，其外交政策變動（如關稅政策、技術管制、印太戰略等），可能重新界定台灣民眾對「民主盟友」的認知。同時，中國在政治與經濟上持續擴張影響力，也使部分群體對兩岸關係產生矛盾態度。在此背景下，探討不同縣市民眾在民主價值、體制信任與對外情感距離之間的關聯，能揭示地方層次的政治意識差異，並理解台灣民主認同如何延伸至對美、對中的國際取向。
本研究旨在運用「民主基金會2025台灣民主價值與治理」調查資料，分析民眾在民主價值堅定度與體制信任上的差異，進一步檢視其如何影響對美國與中國的情感溫度與態度，期能從實證層面理解台灣民主意識的多層次結構與地緣政治意涵。
colnames(data) [1] "ID" "NAME" "TEL_A" "TEL" "TEL_NAME"
[6] "DATE" "BTIME" "ETIME" "RESULT" "CALLER"
[11] "GENDER" "LEVEL" "HOURS" "VERSION" "HOME_A"
[16] "HOME_M" "HOME_O" "SAMPLE" "DATE_1" "BTIME_1"
[21] "ETIME_1" "RESULT_1" "DATE_2" "BTIME_2" "ETIME_2"
[26] "RESULT_2" "DATE_3" "BTIME_3" "ETIME_3" "RESULT_3"
[31] "DATE_4" "BTIME_4" "ETIME_4" "RESULT_4" "DATE_5"
[36] "BTIME_5" "ETIME_5" "RESULT_5" "DATE_6" "BTIME_6"
[41] "ETIME_6" "RESULT_6" "DATE_7" "BTIME_7" "ETIME_7"
[46] "RESULT_7" "Q1" "Q2" "Q3" "Q4"
[51] "Q5" "Q6" "Q7" "Q8" "Q9"
[56] "Q10" "Q11" "Q12" "Q13" "Q14"
[61] "Q15" "Q16" "Q17" "Q18" "Q19"
[66] "Q20" "Q21" "Q22" "Q23" "Q24"
[71] "Q25" "Q26" "Q27" "Q28" "Q29"
[76] "Q30" "Q31" "Q32" "Q33" "Q34"
[81] "Q35" "Q36" "Q37" "Q38" "Q39"
[86] "Q40" "Q41" "Q42" "Q43" "Q44"
[91] "Q45" "Q46" "Q47" "Q48" "Q49"
[96] "Q50" "Q51" "Q52" "Q53" "Q54"
[101] "Q55" "NQ1" "NQ2" "NQ3" "NQ4"
[106] "NQ5" "NQ6" "NQ7" "NQ8" "NQ9"
[111] "NQ10" "NQ11" "NQ12" "NQ13" "NQ14"
[116] "NQ15" "NQ16" "NQ17" "NQ18" "NQ19"
[121] "NQ20" "TYPE" "SEX" "AGE" "EDU"
[126] "SENGI" "SENGI7" "MASENGI" "MASENGI7" "TONDU"
[131] "PARTYID" "PARTY" "PARTYID2" "T_Cidentity" "CAREER"
[136] "CAREER8" "TOWNID" "AAA" "AREAR" "W" 關鍵字：民主價值認同、後川普時代、情感溫度、兩岸關係
研究數據
資料長度（length(dat)）：對 tibble/data.frame，length() 回的是「欄數」，所以是 140。 列數 / 欄數：nrow(dat) = 1218、ncol(dat) = 140。 總儲存格數：1218 × 140 = 170,520。 完整度（completeness）：1 - sum(is.na(dat)) / 170520。 記憶體：object.size(dat)，上面會同時給位元組與易讀格式（KB/MB）。 欄位細節：column_report()
col_na <- sapply(data, function(v) sum(is.na(v)))
col_unique <- sapply(data, function(v) if (is.list(v)) NA_integer_ else dplyr::n_distinct(v, na.rm = TRUE))Ａ.民主價值與制度信任:Q5 (民主是最好制度)、Q6 (對民主政治滿意)、Q7 (對民主是否前景樂觀)、Q8–Q11 (政府信任與滿意度) 代表「民主價值堅定度」、「體制信任」
sjmisc::frq(data$Q5)有人說：「民主也許會有問題，但還是一個最好的制度」，請問您同不同意這種說法？ (x) <numeric>
# total N=1218 valid N=1218 mean=10.17 sd=24.68
Value | Label | N | Raw % | Valid % | Cum. %
---------------------------------------------------
1 | 非常不同意 | 39 | 3.20 | 3.20 | 3.20
2 | 不同意 | 117 | 9.61 | 9.61 | 12.81
3 | 同意 | 551 | 45.24 | 45.24 | 58.05
4 | 非常同意 | 421 | 34.56 | 34.56 | 92.61
95 | 拒答 | 2 | 0.16 | 0.16 | 92.78
96 | 看情形 | 14 | 1.15 | 1.15 | 93.92
97 | 無意見 | 14 | 1.15 | 1.15 | 95.07
98 | 不知道 | 60 | 4.93 | 4.93 | 100.00
<NA> | <NA> | 0 | 0.00 | <NA> | <NA>sjmisc::frq(data$Q6)整體而言，請問您對於目前臺灣民主政治實行的情形滿不滿意？ (x) <numeric>
# total N=1218 valid N=1218 mean=8.78 sd=23.94
Value | Label | N | Raw % | Valid % | Cum. %
---------------------------------------------------
1 | 非常不滿意 | 278 | 22.82 | 22.82 | 22.82
2 | 不滿意 | 329 | 27.01 | 27.01 | 49.84
3 | 滿意 | 427 | 35.06 | 35.06 | 84.89
4 | 非常滿意 | 101 | 8.29 | 8.29 | 93.19
95 | 拒答 | 6 | 0.49 | 0.49 | 93.68
96 | 看情形 | 15 | 1.23 | 1.23 | 94.91
97 | 無意見 | 19 | 1.56 | 1.56 | 96.47
98 | 不知道 | 43 | 3.53 | 3.53 | 100.00
<NA> | <NA> | 0 | 0.00 | <NA> | <NA>sjmisc::frq(data$Q7)請問您對臺灣民主政治未來的發展是悲觀還是樂觀？ (x) <numeric>
# total N=1218 valid N=1218 mean=10.87 sd=27.11
Value | Label | N | Raw % | Valid % | Cum. %
-------------------------------------------------
1 | 非常悲觀 | 227 | 18.64 | 18.64 | 18.64
2 | 悲觀 | 348 | 28.57 | 28.57 | 47.21
3 | 樂觀 | 415 | 34.07 | 34.07 | 81.28
4 | 非常樂觀 | 119 | 9.77 | 9.77 | 91.05
95 | 拒答 | 4 | 0.33 | 0.33 | 91.38
96 | 看情形 | 22 | 1.81 | 1.81 | 93.19
97 | 無意見 | 26 | 2.13 | 2.13 | 95.32
98 | 不知道 | 57 | 4.68 | 4.68 | 100.00
<NA> | <NA> | 0 | 0.00 | <NA> | <NA>sjmisc::frq(data$Q8)有人說：「政府所做的事大多數是正確的」，請問您同不同意這種說法？ (x) <numeric>
# total N=1218 valid N=1218 mean=9.20 sd=24.85
Value | Label | N | Raw % | Valid % | Cum. %
---------------------------------------------------
1 | 非常不同意 | 300 | 24.63 | 24.63 | 24.63
2 | 不同意 | 410 | 33.66 | 33.66 | 58.29
3 | 同意 | 326 | 26.77 | 26.77 | 85.06
4 | 非常同意 | 92 | 7.55 | 7.55 | 92.61
95 | 拒答 | 6 | 0.49 | 0.49 | 93.10
96 | 看情形 | 25 | 2.05 | 2.05 | 95.16
97 | 無意見 | 16 | 1.31 | 1.31 | 96.47
98 | 不知道 | 43 | 3.53 | 3.53 | 100.00
<NA> | <NA> | 0 | 0.00 | <NA> | <NA>sjmisc::frq(data$Q9)有人說：「對於公眾的事務，我們都應該主動來參與」；也有人說：「公眾的事務交給政府處理就好，我們少管為妙」，請問您比較同意哪一種說法？ (x) <numeric>
# total N=1218 valid N=1218 mean=11.75 sd=29.98
Value | Label | N | Raw % | Valid % | Cum. %
---------------------------------------------------------------------------------
1 | 對於公眾的事務，我們都應該主動來參與 | 852 | 69.95 | 69.95 | 69.95
2 | 公眾的事務交給政府處理就好，我們少管為妙 | 232 | 19.05 | 19.05 | 89.00
95 | 拒答 | 10 | 0.82 | 0.82 | 89.82
96 | 看情形 | 38 | 3.12 | 3.12 | 92.94
97 | 無意見 | 30 | 2.46 | 2.46 | 95.40
98 | 不知道 | 56 | 4.60 | 4.60 | 100.00
<NA> | <NA> | 0 | 0.00 | <NA> | <NA>sjmisc::frq(data$Q10)有人說：「政府常浪費納稅人繳的稅金」，請問您同不同意這種說法？ (x) <numeric>
# total N=1218 valid N=1218 mean=11.73 sd=27.50
Value | Label | N | Raw % | Valid % | Cum. %
---------------------------------------------------
1 | 非常不同意 | 93 | 7.64 | 7.64 | 7.64
2 | 不同意 | 294 | 24.14 | 24.14 | 31.77
3 | 同意 | 339 | 27.83 | 27.83 | 59.61
4 | 非常同意 | 378 | 31.03 | 31.03 | 90.64
95 | 拒答 | 8 | 0.66 | 0.66 | 91.30
96 | 看情形 | 27 | 2.22 | 2.22 | 93.51
97 | 無意見 | 12 | 0.99 | 0.99 | 94.50
98 | 不知道 | 67 | 5.50 | 5.50 | 100.00
<NA> | <NA> | 0 | 0.00 | <NA> | <NA>sjmisc::frq(data$Q11)請問您相不相信政府官員說的話？ (x) <numeric>
# total N=1218 valid N=1218 mean=14.76 sd=32.11
Value | Label | N | Raw % | Valid % | Cum. %
---------------------------------------------------
1 | 非常不相信 | 250 | 20.53 | 20.53 | 20.53
2 | 不相信 | 402 | 33.00 | 33.00 | 53.53
3 | 相信 | 358 | 29.39 | 29.39 | 82.92
4 | 非常相信 | 46 | 3.78 | 3.78 | 86.70
95 | 拒答 | 10 | 0.82 | 0.82 | 87.52
96 | 看情形 | 79 | 6.49 | 6.49 | 94.01
97 | 無意見 | 25 | 2.05 | 2.05 | 96.06
98 | 不知道 | 48 | 3.94 | 3.94 | 100.00
<NA> | <NA> | 0 | 0.00 | <NA> | <NA>B. 國際與兩岸互動態度: Q17(對中互動距離)、Q18(對美互動距離)可視為「對外關係取向」、「對美認同」指標若民主價值高者仍維持對美高評價，代表「價值同盟型態」；若經濟因素（如對美依賴、受關稅影響）主導態度下降，代表「功利導向型態」。
sjmisc::frq(data$Q17)我們社會上常常有人討論臺灣要如何跟中國大陸互動，如果用0來表示臺灣跟跟中國大陸的互動應該愈疏遠愈好，用10表示應該愈密切愈好，請問0?10您會給多少？ (x) <numeric>
# total N=1218 valid N=1218 mean=13.11 sd=26.20
Value | Label | N | Raw % | Valid % | Cum. %
---------------------------------------------------------------------------
0 | 臺灣跟中國大陸的互動應該愈疏遠愈好 | 82 | 6.73 | 6.73 | 6.73
1 | 1 | 29 | 2.38 | 2.38 | 9.11
2 | 2 | 40 | 3.28 | 3.28 | 12.40
3 | 3 | 93 | 7.64 | 7.64 | 20.03
4 | 4 | 62 | 5.09 | 5.09 | 25.12
5 | 5 | 402 | 33.00 | 33.00 | 58.13
6 | 6 | 141 | 11.58 | 11.58 | 69.70
7 | 7 | 105 | 8.62 | 8.62 | 78.33
8 | 8 | 85 | 6.98 | 6.98 | 85.30
9 | 9 | 14 | 1.15 | 1.15 | 86.45
10 | 臺灣跟中國大陸的互動應該愈密切愈好 | 59 | 4.84 | 4.84 | 91.30
95 | 拒答 | 14 | 1.15 | 1.15 | 92.45
98 | 不知道 | 92 | 7.55 | 7.55 | 100.00
<NA> | <NA> | 0 | 0.00 | <NA> | <NA>sjmisc::frq(data$Q18)我們社會上常常有人討論臺灣要如何跟美國互動，如果用0來表示臺灣跟美國的互動應該愈疏遠愈好，用10表示應該愈密切愈好，請問0?10您會給多少？ (x) <numeric>
# total N=1218 valid N=1218 mean=13.75 sd=25.16
Value | Label | N | Raw % | Valid % | Cum. %
-----------------------------------------------------------------------
0 | 臺灣跟美國的互動應該愈疏遠愈好 | 24 | 1.97 | 1.97 | 1.97
1 | 1 | 10 | 0.82 | 0.82 | 2.79
2 | 2 | 14 | 1.15 | 1.15 | 3.94
3 | 3 | 33 | 2.71 | 2.71 | 6.65
4 | 4 | 31 | 2.55 | 2.55 | 9.20
5 | 5 | 374 | 30.71 | 30.71 | 39.90
6 | 6 | 142 | 11.66 | 11.66 | 51.56
7 | 7 | 175 | 14.37 | 14.37 | 65.93
8 | 8 | 166 | 13.63 | 13.63 | 79.56
9 | 9 | 32 | 2.63 | 2.63 | 82.18
10 | 臺灣跟美國的互動應該愈密切愈好 | 117 | 9.61 | 9.61 | 91.79
95 | 拒答 | 15 | 1.23 | 1.23 | 93.02
98 | 不知道 | 85 | 6.98 | 6.98 | 100.00
<NA> | <NA> | 0 | 0.00 | <NA> | <NA>C. 政治認同與政黨傾向: Q22–Q23 可控制政治立場、族群認同
sjmisc::frq(data$Q22)在目前國內的政黨中，請問您認為您比較支持哪一個政黨？ (x) <numeric>
# total N=1218 valid N=1218 mean=18.45 sd=30.87
Value | Label | N | Raw % | Valid % | Cum. %
-----------------------------------------------------------
1 | 國民黨 | 222 | 18.23 | 18.23 | 18.23
2 | 民進黨 | 359 | 29.47 | 29.47 | 47.70
3 | 新黨 | 0 | 0.00 | 0.00 | 47.70
4 | 親民黨 | 0 | 0.00 | 0.00 | 47.70
5 | 臺聯 | 0 | 0.00 | 0.00 | 47.70
6 | 都支持 | 68 | 5.58 | 5.58 | 53.28
7 | 都不支持 | 268 | 22.00 | 22.00 | 75.29
8 | 國民黨加民進黨 | 0 | 0.00 | 0.00 | 75.29
16 | 泛藍 | 2 | 0.16 | 0.16 | 75.45
17 | 泛綠 | 1 | 0.08 | 0.08 | 75.53
18 | 在野黨 | 0 | 0.00 | 0.00 | 75.53
19 | 選人不選黨 | 40 | 3.28 | 3.28 | 78.82
20 | 綠黨 | 1 | 0.08 | 0.08 | 78.90
21 | 時代力量 | 4 | 0.33 | 0.33 | 79.23
23 | 社民黨 | 2 | 0.16 | 0.16 | 79.39
29 | 中華統一促進黨 | 0 | 0.00 | 0.00 | 79.39
35 | 台灣基進 | 0 | 0.00 | 0.00 | 79.39
38 | 台灣民眾黨 | 99 | 8.13 | 8.13 | 87.52
42 | 台澎黨 | 1 | 0.08 | 0.08 | 87.60
45 | 臺灣動物保護黨 | 1 | 0.08 | 0.08 | 87.68
46 | 小民參政歐巴桑聯盟 | 0 | 0.00 | 0.00 | 87.68
49 | 麻將最大黨 | 0 | 0.00 | 0.00 | 87.68
51 | 勞動黨 | 0 | 0.00 | 0.00 | 87.68
52 | 人民最大黨 | 1 | 0.08 | 0.08 | 87.77
95 | 拒答 | 25 | 2.05 | 2.05 | 89.82
96 | 看情形 | 47 | 3.86 | 3.86 | 93.68
97 | 無意見 | 46 | 3.78 | 3.78 | 97.45
98 | 不知道 | 31 | 2.55 | 2.55 | 100.00
<NA> | <NA> | 0 | 0.00 | <NA> | <NA>sjmisc::frq(data$Q23)請問您支持〔受訪者回答的政黨〕的程度是非常支持、還是普普通通？ (x) <numeric>
# total N=1218 valid N=1218 mean=43.82 sd=48.29
Value | Label | N | Raw % | Valid % | Cum. %
-------------------------------------------------
1 | 非常支持 | 274 | 22.50 | 22.50 | 22.50
2 | 普普通通 | 416 | 34.15 | 34.15 | 56.65
99 | 跳題 | 528 | 43.35 | 43.35 | 100.00
<NA> | <NA> | 0 | 0.00 | <NA> | <NA>D. 社會背景控制變項: Q24–Q30 年齡、教育、職業、區域等
sjmisc::frq(data$Q24)那請問您有沒有比較偏向哪一個政黨？ (x) <numeric>
# total N=1218 valid N=1218 mean=62.73 sd=44.43
Value | Label | N | Raw % | Valid % | Cum. %
-------------------------------------------------------------
3 | 偏國民黨 | 32 | 2.63 | 2.63 | 2.63
4 | 偏民進黨 | 34 | 2.79 | 2.79 | 5.42
5 | 偏新黨 | 1 | 0.08 | 0.08 | 5.50
6 | 偏親民黨 | 0 | 0.00 | 0.00 | 5.50
7 | 偏臺聯 | 0 | 0.00 | 0.00 | 5.50
8 | 都不偏 | 397 | 32.59 | 32.59 | 38.10
17 | 偏國+民+親 | 0 | 0.00 | 0.00 | 38.10
18 | 偏泛藍 | 3 | 0.25 | 0.25 | 38.34
19 | 偏泛綠 | 1 | 0.08 | 0.08 | 38.42
20 | 在野黨 | 0 | 0.00 | 0.00 | 38.42
21 | 選人不選黨 | 4 | 0.33 | 0.33 | 38.75
23 | 偏綠黨 | 2 | 0.16 | 0.16 | 38.92
24 | 偏時代力量 | 0 | 0.00 | 0.00 | 38.92
26 | 偏社民黨 | 0 | 0.00 | 0.00 | 38.92
32 | 偏中華統一促進黨 | 1 | 0.08 | 0.08 | 39.00
38 | 偏台灣基進 | 0 | 0.00 | 0.00 | 39.00
41 | 偏台灣民眾黨 | 12 | 0.99 | 0.99 | 39.98
44 | 偏喜樂島聯盟 | 0 | 0.00 | 0.00 | 39.98
49 | 偏小民參政歐巴桑聯盟 | 0 | 0.00 | 0.00 | 39.98
52 | 偏麻將最大黨 | 0 | 0.00 | 0.00 | 39.98
54 | 偏勞動黨 | 0 | 0.00 | 0.00 | 39.98
95 | 拒答 | 12 | 0.99 | 0.99 | 40.97
96 | 看情形 | 9 | 0.74 | 0.74 | 41.71
97 | 無意見 | 12 | 0.99 | 0.99 | 42.69
98 | 不知道 | 8 | 0.66 | 0.66 | 43.35
99 | 跳題 | 690 | 56.65 | 56.65 | 100.00
<NA> | <NA> | 0 | 0.00 | <NA> | <NA>sjmisc::frq(data$Q25)在我們社會上，有人說自己是「臺灣人」，也有人說自己是「中國人」，也有人說都是。請問您認為您自己是「臺灣人」、「中國人」，或者都是？ (x) <numeric>
# total N=1218 valid N=1218 mean=5.35 sd=18.99
Value | Label | N | Raw % | Valid % | Cum. %
-----------------------------------------------
1 | 臺灣人 | 704 | 57.80 | 57.80 | 57.80
2 | 都是 | 430 | 35.30 | 35.30 | 93.10
3 | 中國人 | 34 | 2.79 | 2.79 | 95.89
95 | 拒答 | 11 | 0.90 | 0.90 | 96.80
96 | 看情形 | 5 | 0.41 | 0.41 | 97.21
97 | 無意見 | 4 | 0.33 | 0.33 | 97.54
98 | 不知道 | 30 | 2.46 | 2.46 | 100.00
<NA> | <NA> | 0 | 0.00 | <NA> | <NA>sjmisc::frq(data$Q26)請問您是民國哪一年出生的？ (x) <numeric>
# total N=1218 valid N=1218 mean=73.77 sd=114.03
Value | Label | N | Raw % | Valid % | Cum. %
---------------------------------------------
23 | 23 | 1 | 0.08 | 0.08 | 0.08
24 | 24 | 2 | 0.16 | 0.16 | 0.25
25 | 25 | 2 | 0.16 | 0.16 | 0.41
26 | 26 | 3 | 0.25 | 0.25 | 0.66
27 | 27 | 4 | 0.33 | 0.33 | 0.99
28 | 28 | 3 | 0.25 | 0.25 | 1.23
29 | 29 | 5 | 0.41 | 0.41 | 1.64
30 | 30 | 5 | 0.41 | 0.41 | 2.05
31 | 31 | 8 | 0.66 | 0.66 | 2.71
32 | 32 | 5 | 0.41 | 0.41 | 3.12
33 | 33 | 7 | 0.57 | 0.57 | 3.69
34 | 34 | 5 | 0.41 | 0.41 | 4.11
35 | 35 | 11 | 0.90 | 0.90 | 5.01
36 | 36 | 11 | 0.90 | 0.90 | 5.91
37 | 37 | 11 | 0.90 | 0.90 | 6.81
38 | 38 | 22 | 1.81 | 1.81 | 8.62
39 | 39 | 13 | 1.07 | 1.07 | 9.69
40 | 40 | 22 | 1.81 | 1.81 | 11.49
41 | 41 | 11 | 0.90 | 0.90 | 12.40
42 | 42 | 29 | 2.38 | 2.38 | 14.78
43 | 43 | 24 | 1.97 | 1.97 | 16.75
44 | 44 | 23 | 1.89 | 1.89 | 18.64
45 | 45 | 32 | 2.63 | 2.63 | 21.26
46 | 46 | 16 | 1.31 | 1.31 | 22.58
47 | 47 | 38 | 3.12 | 3.12 | 25.70
48 | 48 | 27 | 2.22 | 2.22 | 27.91
49 | 49 | 23 | 1.89 | 1.89 | 29.80
50 | 50 | 35 | 2.87 | 2.87 | 32.68
51 | 51 | 19 | 1.56 | 1.56 | 34.24
52 | 52 | 29 | 2.38 | 2.38 | 36.62
53 | 53 | 28 | 2.30 | 2.30 | 38.92
54 | 54 | 23 | 1.89 | 1.89 | 40.80
55 | 55 | 28 | 2.30 | 2.30 | 43.10
56 | 56 | 22 | 1.81 | 1.81 | 44.91
57 | 57 | 28 | 2.30 | 2.30 | 47.21
58 | 58 | 23 | 1.89 | 1.89 | 49.10
59 | 59 | 18 | 1.48 | 1.48 | 50.57
60 | 60 | 24 | 1.97 | 1.97 | 52.55
61 | 61 | 15 | 1.23 | 1.23 | 53.78
62 | 62 | 28 | 2.30 | 2.30 | 56.08
63 | 63 | 17 | 1.40 | 1.40 | 57.47
64 | 64 | 22 | 1.81 | 1.81 | 59.28
65 | 65 | 27 | 2.22 | 2.22 | 61.49
66 | 66 | 24 | 1.97 | 1.97 | 63.46
67 | 67 | 27 | 2.22 | 2.22 | 65.68
68 | 68 | 33 | 2.71 | 2.71 | 68.39
69 | 69 | 21 | 1.72 | 1.72 | 70.11
70 | 70 | 27 | 2.22 | 2.22 | 72.33
71 | 71 | 18 | 1.48 | 1.48 | 73.81
72 | 72 | 22 | 1.81 | 1.81 | 75.62
73 | 73 | 18 | 1.48 | 1.48 | 77.09
74 | 74 | 14 | 1.15 | 1.15 | 78.24
75 | 75 | 13 | 1.07 | 1.07 | 79.31
76 | 76 | 5 | 0.41 | 0.41 | 79.72
77 | 77 | 15 | 1.23 | 1.23 | 80.95
78 | 78 | 12 | 0.99 | 0.99 | 81.94
79 | 79 | 14 | 1.15 | 1.15 | 83.09
80 | 80 | 23 | 1.89 | 1.89 | 84.98
81 | 81 | 16 | 1.31 | 1.31 | 86.29
82 | 82 | 10 | 0.82 | 0.82 | 87.11
83 | 83 | 15 | 1.23 | 1.23 | 88.34
84 | 84 | 15 | 1.23 | 1.23 | 89.57
85 | 85 | 11 | 0.90 | 0.90 | 90.48
86 | 86 | 18 | 1.48 | 1.48 | 91.95
87 | 87 | 11 | 0.90 | 0.90 | 92.86
88 | 88 | 14 | 1.15 | 1.15 | 94.01
89 | 89 | 11 | 0.90 | 0.90 | 94.91
90 | 90 | 11 | 0.90 | 0.90 | 95.81
91 | 91 | 12 | 0.99 | 0.99 | 96.80
92 | 92 | 5 | 0.41 | 0.41 | 97.21
93 | 93 | 8 | 0.66 | 0.66 | 97.87
94 | 94 | 8 | 0.66 | 0.66 | 98.52
995 | 拒答 | 18 | 1.48 | 1.48 | 100.00
<NA> | <NA> | 0 | 0.00 | <NA> | <NA>sjmisc::frq(data$Q27)請問您的最高學歷是什麼？ (x) <numeric>
# total N=1218 valid N=1218 mean=5.60 sd=7.85
Value | Label | N | Raw % | Valid % | Cum. %
-------------------------------------------------------
1 | 不識字及未入學 | 23 | 1.89 | 1.89 | 1.89
2 | 小學 | 63 | 5.17 | 5.17 | 7.06
3 | 國、初中 | 78 | 6.40 | 6.40 | 13.46
4 | 高中、職 | 322 | 26.44 | 26.44 | 39.90
5 | 專科 | 178 | 14.61 | 14.61 | 54.52
6 | 大學 | 409 | 33.58 | 33.58 | 88.10
7 | 研究所及以上 | 136 | 11.17 | 11.17 | 99.26
95 | 拒答 | 9 | 0.74 | 0.74 | 100.00
<NA> | <NA> | 0 | 0.00 | <NA> | <NA>sjmisc::frq(data$Q28)請問您的父親是本省客家人、本省閩南人、大陸各省市人、原住民，還是新住民？ (x) <numeric>
# total N=1218 valid N=1218 mean=5.15 sd=16.99
Value | Label | N | Raw % | Valid % | Cum. %
-----------------------------------------------------
1 | 本省客家人 | 142 | 11.66 | 11.66 | 11.66
2 | 本省閩南人 | 903 | 74.14 | 74.14 | 85.80
3 | 大陸各省市人 | 106 | 8.70 | 8.70 | 94.50
4 | 原住民 | 21 | 1.72 | 1.72 | 96.22
5 | 外籍人士 | 3 | 0.25 | 0.25 | 96.47
6 | 大陸新住民 | 0 | 0.00 | 0.00 | 96.47
7 | 外國新住民 | 3 | 0.25 | 0.25 | 96.72
95 | 拒答 | 10 | 0.82 | 0.82 | 97.54
98 | 不知道 | 30 | 2.46 | 2.46 | 100.00
<NA> | <NA> | 0 | 0.00 | <NA> | <NA>sjmisc::frq(data$Q29)請問您的母親是本省客家人、本省閩南人、大陸各省市人、原住民，還是新住民？ (x) <numeric>
# total N=1218 valid N=1218 mean=4.75 sd=15.95
Value | Label | N | Raw % | Valid % | Cum. %
-----------------------------------------------------
1 | 本省客家人 | 150 | 12.32 | 12.32 | 12.32
2 | 本省閩南人 | 944 | 77.50 | 77.50 | 89.82
3 | 大陸各省市人 | 51 | 4.19 | 4.19 | 94.01
4 | 原住民 | 22 | 1.81 | 1.81 | 95.81
5 | 外籍人士 | 3 | 0.25 | 0.25 | 96.06
6 | 大陸新住民 | 2 | 0.16 | 0.16 | 96.22
7 | 外國新住民 | 11 | 0.90 | 0.90 | 97.13
95 | 拒答 | 8 | 0.66 | 0.66 | 97.78
98 | 不知道 | 27 | 2.22 | 2.22 | 100.00
<NA> | <NA> | 0 | 0.00 | <NA> | <NA>sjmisc::frq(data$Q30)請問您的職業是什麼？ (x) <numeric>
# total N=1218 valid N=1218 mean=525.57 sd=313.70
Value | Label | N | Raw %
------------------------------------------------------------------------------
101 | 民意代表 | 0 | 0.00
102 | 政府行政主管 | 6 | 0.49
103 | 公營事業主管 | 1 | 0.08
104 | 民營事業主管 | 91 | 7.47
105 | 民營事業公司負責人(自營商人)，有雇用人 | 67 | 5.50
106 | 民營事業公司負責人(自營商人)，沒有雇用人 | 43 | 3.53
201 | 政府部門研究人員(科學家) | 0 | 0.00
202 | 私人部門研究人員(科學家) | 2 | 0.16
203 | 公立醫療單位醫事技術人員（醫師、藥師、護士、醫療人員） | 6 | 0.49
204 | 非公立醫療單位醫事技術人員（醫師、藥師、護士、醫療人員） | 16 | 1.31
205 | 會計師 | 1 | 0.08
206 | 公立教育機構教師 | 28 | 2.30
207 | 私立教育機構教師 | 11 | 0.90
208 | 法官、書記官、檢察官、司法官 | 0 | 0.00
209 | 律師 | 1 | 0.08
210 | 宗教工作者 | 2 | 0.16
211 | 藝術工作者（演員、表演工作者、攝影師） | 2 | 0.16
212 | 文字工作者(作家、記者、劇作家) | 1 | 0.08
213 | 公營事業工程師(機師) | 1 | 0.08
214 | 民營事業工程師(機師) | 45 | 3.69
215 | 職業運動專業人士 | 1 | 0.08
301 | 政府單位與公營事業部門職員 | 33 | 2.71
302 | 民營事業職員 | 154 | 12.64
303 | 買賣業務人員 | 8 | 0.66
401 | 服務、餐旅人員(含攤販、個人服務、計程車司機) | 38 | 3.12
501 | 農林漁牧 | 36 | 2.96
601 | 政府單位與公營事業部門勞工 | 13 | 1.07
602 | 民營事業勞工 | 177 | 14.53
701 | 學生 | 29 | 2.38
801 | 軍警調查局人員 | 2 | 0.16
901 | 家管，沒有做家庭代工 | 57 | 4.68
902 | 家管，有做家庭代工 | 5 | 0.41
903 | 家管，家裡有事業，有幫忙但未領薪水 | 4 | 0.33
904 | 家管，家裡有事業，有幫忙且領薪水 | 7 | 0.57
905 | 失業者 | 29 | 2.38
906 | 退休者 | 287 | 23.56
907 | 無正式職業，但有其他收入 | 4 | 0.33
911 | 一直無業 | 2 | 0.16
995 | 拒答 | 8 | 0.66
<NA> | <NA> | 0 | 0.00
Value | Valid % | Cum. %
------------------------
101 | 0.00 | 0.00
102 | 0.49 | 0.49
103 | 0.08 | 0.57
104 | 7.47 | 8.05
105 | 5.50 | 13.55
106 | 3.53 | 17.08
201 | 0.00 | 17.08
202 | 0.16 | 17.24
203 | 0.49 | 17.73
204 | 1.31 | 19.05
205 | 0.08 | 19.13
206 | 2.30 | 21.43
207 | 0.90 | 22.33
208 | 0.00 | 22.33
209 | 0.08 | 22.41
210 | 0.16 | 22.58
211 | 0.16 | 22.74
212 | 0.08 | 22.82
213 | 0.08 | 22.91
214 | 3.69 | 26.60
215 | 0.08 | 26.68
301 | 2.71 | 29.39
302 | 12.64 | 42.04
303 | 0.66 | 42.69
401 | 3.12 | 45.81
501 | 2.96 | 48.77
601 | 1.07 | 49.84
602 | 14.53 | 64.37
701 | 2.38 | 66.75
801 | 0.16 | 66.91
901 | 4.68 | 71.59
902 | 0.41 | 72.00
903 | 0.33 | 72.33
904 | 0.57 | 72.91
905 | 2.38 | 75.29
906 | 23.56 | 98.85
907 | 0.33 | 99.18
911 | 0.16 | 99.34
995 | 0.66 | 100.00
<NA> | <NA> | <NA>str(data)tibble [1,218 × 140] (S3: tbl_df/tbl/data.frame)
$ ID : num [1:1218] 390023 390056 390062 390085 390090 ...
..- attr(*, "label")= chr "樣本編號"
..- attr(*, "format.spss")= chr "F6.0"
$ NAME : chr [1:1218] "唯一合格男" "唯一合格女" "最年輕的女" "唯一合格男" ...
..- attr(*, "label")= chr "受訪者姓名"
..- attr(*, "format.spss")= chr "A10"
..- attr(*, "display_width")= int 12
$ TEL_A : num [1:1218] 6 5 7 8 2 42 2 4 7 2 ...
..- attr(*, "label")= chr "電話區碼"
..- attr(*, "format.spss")= chr "F5.0"
..- attr(*, "display_width")= int 7
$ TEL : num [1:1218] 1e+07 1e+07 1e+07 1e+07 1e+07 ...
..- attr(*, "label")= chr "電話號碼"
..- attr(*, "format.spss")= chr "F8.0"
..- attr(*, "display_width")= int 10
$ TEL_NAME : chr [1:1218] "05" "05" "05" "05" ...
..- attr(*, "label")= chr "電話套數"
..- attr(*, "format.spss")= chr "A6"
..- attr(*, "display_width")= int 10
$ DATE : num [1:1218] 250624 250624 250624 250627 250624 ...
..- attr(*, "label")= chr "訪問日期"
..- attr(*, "format.spss")= chr "F6.0"
$ BTIME : num [1:1218] 212837 213117 213149 211517 213458 ...
..- attr(*, "label")= chr "開始時間"
..- attr(*, "format.spss")= chr "F6.0"
$ ETIME : num [1:1218] 213958 214249 214307 212245 214946 ...
..- attr(*, "label")= chr "結束時間"
..- attr(*, "format.spss")= chr "F6.0"
$ RESULT : dbl+lbl [1:1218] 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,...
..@ label : chr "訪問結果"
..@ format.spss: chr "F3.0"
..@ labels : Named num [1:38] 0 10 20 30 40 50 60 70 80 81 ...
.. ..- attr(*, "names")= chr [1:38] "訪問成功" "受訪者暫時不在 或 不便接聽 (非當日約訪者)" "受訪者因臨時有事而中途拒訪 (非當日約訪者)" "受訪者暫時不在 或 不便接聽 (可當日約訪者)" ...
$ CALLER : num [1:1218] 1.00e+05 1.14e+08 1.00e+05 1.00e+05 1.00e+05 ...
..- attr(*, "label")= chr "訪員編號"
..- attr(*, "format.spss")= chr "F10.0"
..- attr(*, "display_width")= int 12
$ GENDER : dbl+lbl [1:1218] 1, 1, 2, 2, 1, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 1,...
..@ label : chr "訪員性別"
..@ format.spss: chr "F1.0"
..@ labels : Named num [1:2] 1 2
.. ..- attr(*, "names")= chr [1:2] "男" "女"
$ LEVEL : dbl+lbl [1:1218] 3, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 3, 1, 1, 1, 1, 1,...
..@ label : chr "訪員級數"
..@ format.spss : chr "F2.0"
..@ display_width: int 7
..@ labels : Named num [1:3] 1 2 3
.. ..- attr(*, "names")= chr [1:3] "第一級" "第二級" "第三級"
$ HOURS : num [1:1218] 24 72 260 1032 520 ...
..- attr(*, "label")= chr "累計時數"
..- attr(*, "format.spss")= chr "F7.0"
..- attr(*, "display_width")= int 9
$ VERSION : num [1:1218] 1 1 1 1 1 1 1 1 1 1 ...
..- attr(*, "label")= chr "版本"
..- attr(*, "format.spss")= chr "F2.0"
..- attr(*, "display_width")= int 9
$ HOME_A : num [1:1218] 2 3 3 2 1 2 1 2 1 3 ...
..- attr(*, "label")= chr "戶中全部合格人數"
..- attr(*, "format.spss")= chr "F2.0"
$ HOME_M : num [1:1218] 1 2 0 1 1 1 1 1 1 2 ...
..- attr(*, "label")= chr "戶中合格男性人數"
..- attr(*, "format.spss")= chr "F2.0"
$ HOME_O : num [1:1218] 1 1 3 1 1 1 1 1 1 3 ...
..- attr(*, "label")= chr "戶中排行"
..- attr(*, "format.spss")= chr "F2.0"
$ SAMPLE : dbl+lbl [1:1218] 1, 1, 1, 1, 1, 2, 1, 1, 1, 2, 1, 2, 1, 1, 1, 2, 1, 1,...
..@ label : chr "受訪樣本"
..@ format.spss: chr "F1.0"
..@ labels : Named num [1:2] 1 2
.. ..- attr(*, "names")= chr [1:2] "正取樣本" "替代樣本"
$ DATE_1 : num [1:1218] NA NA NA NA NA NA NA NA NA NA ...
..- attr(*, "label")= chr "訪問日期_1"
..- attr(*, "format.spss")= chr "F6.0"
$ BTIME_1 : num [1:1218] NA NA NA NA NA NA NA NA NA NA ...
..- attr(*, "label")= chr "開始時間_1"
..- attr(*, "format.spss")= chr "F6.0"
..- attr(*, "display_width")= int 9
$ ETIME_1 : num [1:1218] NA NA NA NA NA NA NA NA NA NA ...
..- attr(*, "label")= chr "結束時間_1"
..- attr(*, "format.spss")= chr "F6.0"
..- attr(*, "display_width")= int 9
$ RESULT_1 : num [1:1218] NA NA NA NA NA NA NA NA NA NA ...
..- attr(*, "label")= chr "訪問結果_1"
..- attr(*, "format.spss")= chr "F3.0"
..- attr(*, "display_width")= int 10
$ DATE_2 : num [1:1218] NA NA NA NA NA NA NA NA NA NA ...
..- attr(*, "label")= chr "訪問日期_2"
..- attr(*, "format.spss")= chr "F6.0"
$ BTIME_2 : num [1:1218] NA NA NA NA NA NA NA NA NA NA ...
..- attr(*, "label")= chr "開始時間_2"
..- attr(*, "format.spss")= chr "F6.0"
..- attr(*, "display_width")= int 9
$ ETIME_2 : num [1:1218] NA NA NA NA NA NA NA NA NA NA ...
..- attr(*, "label")= chr "結束時間_2"
..- attr(*, "format.spss")= chr "F6.0"
..- attr(*, "display_width")= int 9
$ RESULT_2 : num [1:1218] NA NA NA NA NA NA NA NA NA NA ...
..- attr(*, "label")= chr "訪問結果_2"
..- attr(*, "format.spss")= chr "F3.0"
..- attr(*, "display_width")= int 10
$ DATE_3 : num [1:1218] NA NA NA NA NA NA NA NA NA NA ...
..- attr(*, "label")= chr "訪問日期_3"
..- attr(*, "format.spss")= chr "F6.0"
$ BTIME_3 : num [1:1218] NA NA NA NA NA NA NA NA NA NA ...
..- attr(*, "label")= chr "開始時間_3"
..- attr(*, "format.spss")= chr "F6.0"
..- attr(*, "display_width")= int 9
$ ETIME_3 : num [1:1218] NA NA NA NA NA NA NA NA NA NA ...
..- attr(*, "label")= chr "結束時間_3"
..- attr(*, "format.spss")= chr "F6.0"
..- attr(*, "display_width")= int 9
$ RESULT_3 : num [1:1218] NA NA NA NA NA NA NA NA NA NA ...
..- attr(*, "label")= chr "訪問結果_3"
..- attr(*, "format.spss")= chr "F3.0"
..- attr(*, "display_width")= int 10
$ DATE_4 : num [1:1218] NA NA NA NA NA NA NA NA NA NA ...
..- attr(*, "label")= chr "訪問日期_4"
..- attr(*, "format.spss")= chr "F6.0"
$ BTIME_4 : num [1:1218] NA NA NA NA NA NA NA NA NA NA ...
..- attr(*, "label")= chr "開始時間_4"
..- attr(*, "format.spss")= chr "F6.0"
..- attr(*, "display_width")= int 9
$ ETIME_4 : num [1:1218] NA NA NA NA NA NA NA NA NA NA ...
..- attr(*, "label")= chr "結束時間_4"
..- attr(*, "format.spss")= chr "F6.0"
..- attr(*, "display_width")= int 9
$ RESULT_4 : num [1:1218] NA NA NA NA NA NA NA NA NA NA ...
..- attr(*, "label")= chr "訪問結果_4"
..- attr(*, "format.spss")= chr "F3.0"
..- attr(*, "display_width")= int 10
$ DATE_5 : num [1:1218] NA NA NA NA NA NA NA NA NA NA ...
..- attr(*, "label")= chr "訪問日期_5"
..- attr(*, "format.spss")= chr "F6.0"
$ BTIME_5 : num [1:1218] NA NA NA NA NA NA NA NA NA NA ...
..- attr(*, "label")= chr "開始時間_5"
..- attr(*, "format.spss")= chr "F6.0"
..- attr(*, "display_width")= int 9
$ ETIME_5 : num [1:1218] NA NA NA NA NA NA NA NA NA NA ...
..- attr(*, "label")= chr "結束時間_5"
..- attr(*, "format.spss")= chr "F6.0"
..- attr(*, "display_width")= int 9
$ RESULT_5 : num [1:1218] NA NA NA NA NA NA NA NA NA NA ...
..- attr(*, "label")= chr "訪問結果_5"
..- attr(*, "format.spss")= chr "F3.0"
..- attr(*, "display_width")= int 10
$ DATE_6 : num [1:1218] NA NA NA NA NA NA NA NA NA NA ...
..- attr(*, "label")= chr "訪問日期_6"
..- attr(*, "format.spss")= chr "F6.0"
$ BTIME_6 : num [1:1218] NA NA NA NA NA NA NA NA NA NA ...
..- attr(*, "label")= chr "開始時間_6"
..- attr(*, "format.spss")= chr "F6.0"
..- attr(*, "display_width")= int 9
$ ETIME_6 : num [1:1218] NA NA NA NA NA NA NA NA NA NA ...
..- attr(*, "label")= chr "結束時間_6"
..- attr(*, "format.spss")= chr "F6.0"
..- attr(*, "display_width")= int 9
$ RESULT_6 : num [1:1218] NA NA NA NA NA NA NA NA NA NA ...
..- attr(*, "label")= chr "訪問結果_6"
..- attr(*, "format.spss")= chr "F3.0"
..- attr(*, "display_width")= int 10
$ DATE_7 : num [1:1218] NA NA NA NA NA NA NA NA NA NA ...
..- attr(*, "label")= chr "訪問日期_7"
..- attr(*, "format.spss")= chr "F6.0"
$ BTIME_7 : num [1:1218] NA NA NA NA NA NA NA NA NA NA ...
..- attr(*, "label")= chr "開始時間_7"
..- attr(*, "format.spss")= chr "F6.0"
..- attr(*, "display_width")= int 9
$ ETIME_7 : num [1:1218] NA NA NA NA NA NA NA NA NA NA ...
..- attr(*, "label")= chr "結束時間_7"
..- attr(*, "format.spss")= chr "F6.0"
..- attr(*, "display_width")= int 9
$ RESULT_7 : num [1:1218] NA NA NA NA NA NA NA NA NA NA ...
..- attr(*, "label")= chr "訪問結果_7"
..- attr(*, "format.spss")= chr "F3.0"
..- attr(*, "display_width")= int 10
$ Q1 : dbl+lbl [1:1218] 2, 3, 2, 2, 2, 2, 3, 2, 2, 2, 3, 2, 3, ...
..@ label : chr "整體來說，請問您對政治的事情，感不感興趣？是非常有興趣、還算有興趣、不太有興趣，還是完全沒興趣？"
..@ format.spss : chr "F2.0"
..@ display_width: int 4
..@ labels : Named num [1:8] 1 2 3 4 95 96 97 98
.. ..- attr(*, "names")= chr [1:8] "非常有興趣" "還算有興趣" "不太有興趣" "完全沒興趣" ...
$ Q2 : dbl+lbl [1:1218] 3, 3, 3, 3, 3, 3, 96, 3, 3, 3, 98, 3, 2, ...
..@ label : chr "請問您認為假消息與資訊操弄會不會危害臺灣民主政治的發展？是幾乎不會、有一點會、還是危害很大？"
..@ format.spss : chr "F2.0"
..@ display_width: int 4
..@ labels : Named num [1:7] 1 2 3 95 96 97 98
.. ..- attr(*, "names")= chr [1:7] "幾乎不會" "有一點會" "危害很大" "拒答" ...
$ Q3 : dbl+lbl [1:1218] 2, 2, 1, 4, 3, 1, 98, 1, 1, 1, 98, 1, 3, ...
..@ label : chr "有人說：「假消息與資訊操弄也是言論自由所允許的」，請問您同不同意這種說法？"
..@ format.spss : chr "F2.0"
..@ display_width: int 4
..@ labels : Named num [1:8] 1 2 3 4 95 96 97 98
.. ..- attr(*, "names")= chr [1:8] "非常不同意" "不同意" "同意" "非常同意" ...
$ Q4 : dbl+lbl [1:1218] 3, 98, 1, 4, 2, 1, 3, 1, 3, 1, 98, 1, 2, ...
..@ label : chr "有人說：「大多數的假消息與資訊操弄是從中國來的」，請問您同不同意這種說法？"
..@ format.spss : chr "F2.0"
..@ display_width: int 4
..@ labels : Named num [1:8] 1 2 3 4 95 96 97 98
.. ..- attr(*, "names")= chr [1:8] "非常不同意" "不同意" "同意" "非常同意" ...
$ Q5 : dbl+lbl [1:1218] 2, 3, 4, 4, 3, 3, 4, 4, 4, 3, 98, 4, 4, ...
..@ label : chr "有人說：「民主也許會有問題，但還是一個最好的制度」，請問您同不同意這種說法？"
..@ format.spss : chr "F2.0"
..@ display_width: int 4
..@ labels : Named num [1:8] 1 2 3 4 95 96 97 98
.. ..- attr(*, "names")= chr [1:8] "非常不同意" "不同意" "同意" "非常同意" ...
$ Q6 : dbl+lbl [1:1218] 3, 2, 1, 4, 1, 1, 3, 2, 4, 1, 98, 1, 3, ...
..@ label : chr "整體而言，請問您對於目前臺灣民主政治實行的情形滿不滿意？"
..@ format.spss : chr "F2.0"
..@ display_width: int 4
..@ labels : Named num [1:8] 1 2 3 4 95 96 97 98
.. ..- attr(*, "names")= chr [1:8] "非常不滿意" "不滿意" "滿意" "非常滿意" ...
$ Q7 : dbl+lbl [1:1218] 3, 2, 1, 4, 2, 1, 4, 3, 3, 1, 98, 1, 3, ...
..@ label : chr "請問您對臺灣民主政治未來的發展是悲觀還是樂觀？"
..@ format.spss : chr "F2.0"
..@ display_width: int 4
..@ labels : Named num [1:8] 1 2 3 4 95 96 97 98
.. ..- attr(*, "names")= chr [1:8] "非常悲觀" "悲觀" "樂觀" "非常樂觀" ...
$ Q8 : dbl+lbl [1:1218] 3, 2, 1, 4, 1, 1, 3, 2, 4, 1, 3, 2, 1, ...
..@ label : chr "有人說：「政府所做的事大多數是正確的」，請問您同不同意這種說法？"
..@ format.spss : chr "F2.0"
..@ display_width: int 4
..@ labels : Named num [1:8] 1 2 3 4 95 96 97 98
.. ..- attr(*, "names")= chr [1:8] "非常不同意" "不同意" "同意" "非常同意" ...
$ Q9 : dbl+lbl [1:1218] 2, 1, 1, 1, 1, 1, 1, 1, 1, 1, 2, 1, 98, ...
..@ label : chr "有人說：「對於公眾的事務，我們都應該主動來參與」；也有人說：「公眾的事務交給政府處理就好，我們少管為妙」，請問"| __truncated__
..@ format.spss : chr "F2.0"
..@ display_width: int 4
..@ labels : Named num [1:6] 1 2 95 96 97 98
.. ..- attr(*, "names")= chr [1:6] "對於公眾的事務，我們都應該主動來參與" "公眾的事務交給政府處理就好，我們少管為妙" "拒答" "看情形" ...
$ Q10 : dbl+lbl [1:1218] 2, 3, 4, 1, 4, 4, 1, 3, 1, 4, 98, 3, 4, ...
..@ label : chr "有人說：「政府常浪費納稅人繳的稅金」，請問您同不同意這種說法？"
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:8] 1 2 3 4 95 96 97 98
.. ..- attr(*, "names")= chr [1:8] "非常不同意" "不同意" "同意" "非常同意" ...
$ Q11 : dbl+lbl [1:1218] 3, 2, 1, 4, 1, 1, 4, 3, 3, 1, 98, 1, 1, 9...
..@ label : chr "請問您相不相信政府官員說的話？"
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:8] 1 2 3 4 95 96 97 98
.. ..- attr(*, "names")= chr [1:8] "非常不相信" "不相信" "相信" "非常相信" ...
$ Q12 : dbl+lbl [1:1218] 2, 1, 1, 2, 97, 1, 96, 1, 2, 1, 98, 1, 95, ...
..@ label : chr "有人說：「總統與立法院的多數立委最好是不同政黨，才能互相制衡，但也有人說：「總統與立法院的多數立委最好是同一政"| __truncated__
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:6] 1 2 95 96 97 98
.. ..- attr(*, "names")= chr [1:6] "總統與立法院的多數立委最好是不同政黨，才能互相制衡" "總統與立法院的多數立委最好是同一政黨，才可以貫徹政策" "拒答" "很難說" ...
$ Q13 : dbl+lbl [1:1218] 1, 2, 2, 1, 98, 2, 96, 2, 1, 2, 98, 2, 95, ...
..@ label : chr "如果總統跟立法院的多數立委是不同政黨，且政治立場差異很大。請問您認為國家的重大政策應該由總統來決定，還是由立法院來決定？"
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:6] 1 2 95 96 97 98
.. ..- attr(*, "names")= chr [1:6] "總統" "立法院" "拒答" "看情形" ...
$ Q14 : dbl+lbl [1:1218] 2, 2, 2, 1, 1, 96, 1, 1, 1, 2, 98, 2, 1, ...
..@ label : chr "有人說：「民意代表和民選官員是由人民選出，民眾只要認為他沒做好，就可以罷免他，但也有人說：「罷免民意代表和民選"| __truncated__
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:6] 1 2 95 96 97 98
.. ..- attr(*, "names")= chr [1:6] "民意代表和民選官員是由人民選出，民眾只要認為他沒做好，就可以罷免他" "罷免民意代表和民選官員容易成為政治報復的工具，所以應該儘量少用" "拒答" "很難說" ...
$ Q15 : dbl+lbl [1:1218] 1, 4, 4, 2, 3, 5, 1, 4, 1, 5, 98, 4, 2, ...
..@ label : chr "請問您認為，罷免對我們國家的民主發展，是有好的影響，還是有壞的影響？"
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:9] 1 2 3 4 5 95 96 97 98
.. ..- attr(*, "names")= chr [1:9] "都是好的影響" "好的影響比較多" "一半一半" "壞的影響比較多" ...
$ Q16 : dbl+lbl [1:1218] 2, 98, 96, 3, 2, 2, 98, 3, 3, 2, 98, 2, 2, ...
..@ label : chr "目前罷免區域立委的規定是四分之一以上的選民出席投票，且同意票多於不同意票即通過罷免。請問您認為這樣的門檻是太高"| __truncated__
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:7] 1 2 3 95 96 97 98
.. ..- attr(*, "names")= chr [1:7] "太高" "太低" "剛剛好" "拒答" ...
$ Q17 : dbl+lbl [1:1218] 0, 5, 6, 5, 5, 9, 3, 6, 4, 8, 98, 7, 5, ...
..@ label : chr "我們社會上常常有人討論臺灣要如何跟中國大陸互動，如果用0來表示臺灣跟跟中國大陸的互動應該愈疏遠愈好，用10表示應該"| __truncated__
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:4] 0 10 95 98
.. ..- attr(*, "names")= chr [1:4] "臺灣跟中國大陸的互動應該愈疏遠愈好" "臺灣跟中國大陸的互動應該愈密切愈好" "拒答" "不知道"
$ Q18 : dbl+lbl [1:1218] 10, 5, 6, 9, 5, 7, 7, 7, 10, 3, 98, 4, 5, ...
..@ label : chr "我們社會上常常有人討論臺灣要如何跟美國互動，如果用0來表示臺灣跟美國的互動應該愈疏遠愈好，用10表示應該愈密切愈好"| __truncated__
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:4] 0 10 95 98
.. ..- attr(*, "names")= chr [1:4] "臺灣跟美國的互動應該愈疏遠愈好" "臺灣跟美國的互動應該愈密切愈好" "拒答" "不知道"
$ Q19 : dbl+lbl [1:1218] 4, 3, 2, 4, 3, 1, 4, 3, 4, 1, 98, 1, 4, ...
..@ label : chr "如果因為臺灣宣布獨立導致中國大陸武力攻打臺灣，請問您願不願意為保衛臺灣而戰？"
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:8] 1 2 3 4 95 96 97 98
.. ..- attr(*, "names")= chr [1:8] "非常不願意" "不願意" "願意" "非常願意" ...
$ Q20 : dbl+lbl [1:1218] 3, 3, 1, 4, 3, 1, 4, 3, 4, 1, 98, 1, 4, ...
..@ label : chr "如果中國大陸為了統一對臺灣使用武力，請問您願不願意為保衛臺灣而戰？"
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:8] 1 2 3 4 95 96 97 98
.. ..- attr(*, "names")= chr [1:8] "非常不願意" "不願意" "願意" "非常願意" ...
$ Q21 : dbl+lbl [1:1218] 5, 5, 5, 5, 6, 6, 2, 5, 4, 5, 98, 3, 95, ...
..@ label : chr "關於臺灣和中國大陸的關係，有下面幾種不同的看法："
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:12] 1 2 3 4 5 6 7 8 95 96 ...
.. ..- attr(*, "names")= chr [1:12] "儘快統一" "儘快宣佈獨立" "維持現狀，以後走向統一" "維持現狀，以後走向獨立" ...
$ Q22 : dbl+lbl [1:1218] 2, 96, 1, 6, 38, 38, 2, 1, 2, 1, 7, 1, 7, ...
..@ label : chr "在目前國內的政黨中，請問您認為您比較支持哪一個政黨？"
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:28] 1 2 3 4 5 6 7 8 16 17 ...
.. ..- attr(*, "names")= chr [1:28] "國民黨" "民進黨" "新黨" "親民黨" ...
$ Q23 : dbl+lbl [1:1218] 1, 99, 1, 99, 1, 1, 1, 2, 1, 1, 99, 2, 99, ...
..@ label : chr "請問您支持〔受訪者回答的政黨〕的程度是非常支持、還是普普通通？"
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:3] 1 2 99
.. ..- attr(*, "names")= chr [1:3] "非常支持" "普普通通" "跳題"
$ Q24 : dbl+lbl [1:1218] 99, 3, 99, 8, 99, 99, 99, 99, 99, 99, 8, 99, 8, 9...
..@ label : chr "那請問您有沒有比較偏向哪一個政黨？"
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:26] 3 4 5 6 7 8 17 18 19 20 ...
.. ..- attr(*, "names")= chr [1:26] "偏國民黨" "偏民進黨" "偏新黨" "偏親民黨" ...
$ Q25 : dbl+lbl [1:1218] 1, 1, 2, 1, 1, 2, 1, 1, 1, 2, 98, 2, 2, ...
..@ label : chr "在我們社會上，有人說自己是「臺灣人」，也有人說自己是「中國人」，也有人說都是。請問您認為您自己是「臺灣人」、「"| __truncated__
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:7] 1 2 3 95 96 97 98
.. ..- attr(*, "names")= chr [1:7] "臺灣人" "都是" "中國人" "拒答" ...
$ Q26 : dbl+lbl [1:1218] 43, 57, 44, 26, 65, 64, 47, 70, 47, 54, 36, 50, 69, 3...
..@ label : chr "請問您是民國哪一年出生的？"
..@ format.spss : chr "F3.0"
..@ display_width: int 5
..@ labels : Named num 995
.. ..- attr(*, "names")= chr "拒答"
$ Q27 : dbl+lbl [1:1218] 5, 3, 7, 4, 5, 5, 4, 6, 6, 3, 2, 4, 4, ...
..@ label : chr "請問您的最高學歷是什麼？"
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:8] 1 2 3 4 5 6 7 95
.. ..- attr(*, "names")= chr [1:8] "不識字及未入學" "小學" "國、初中" "高中、職" ...
$ Q28 : dbl+lbl [1:1218] 2, 2, 3, 1, 2, 2, 2, 2, 2, 3, 1, 2, 2, 1, 2, 3, 2, 2,...
..@ label : chr "請問您的父親是本省客家人、本省閩南人、大陸各省市人、原住民，還是新住民？"
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:9] 1 2 3 4 5 6 7 95 98
.. ..- attr(*, "names")= chr [1:9] "本省客家人" "本省閩南人" "大陸各省市人" "原住民" ...
$ Q29 : dbl+lbl [1:1218] 2, 2, 3, 1, 2, 2, 2, 2, 2, 2, 1, 2, 2, 1, 2, 3, 2, 2,...
..@ label : chr "請問您的母親是本省客家人、本省閩南人、大陸各省市人、原住民，還是新住民？"
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:9] 1 2 3 4 5 6 7 95 98
.. ..- attr(*, "names")= chr [1:9] "本省客家人" "本省閩南人" "大陸各省市人" "原住民" ...
$ Q30 : dbl+lbl [1:1218] 906, 602, 106, 501, 401, 901, 906, 206, 501, 905, 906...
..@ label : chr "請問您的職業是什麼？"
..@ format.spss : chr "F3.0"
..@ display_width: int 5
..@ labels : Named num [1:39] 101 102 103 104 105 106 201 202 203 204 ...
.. ..- attr(*, "names")= chr [1:39] "民意代表" "政府行政主管" "公營事業主管" "民營事業主管" ...
$ Q31 : dbl+lbl [1:1218] 999, 999, 999, 999, 999, 104, 999, 999, 999, 999, 999...
..@ label : chr "請問您先生（或太太）的職業是什麼？"
..@ format.spss : chr "F3.0"
..@ display_width: int 5
..@ labels : Named num [1:36] 101 102 103 104 105 106 201 202 203 204 ...
.. ..- attr(*, "names")= chr [1:36] "民代" "政府行政主管" "公營事業主管" "民營事業主管" ...
$ Q32 : dbl+lbl [1:1218] 801, 999, 999, 999, 999, 999, 104, 999, 999, 602, 602...
..@ label : chr "請問您以前（或退休前）的職業是什麼？"
..@ format.spss : chr "F3.0"
..@ display_width: int 5
..@ labels : Named num [1:33] 101 102 103 104 105 106 201 202 203 204 ...
.. ..- attr(*, "names")= chr [1:33] "民代" "政府行政主管" "公營事業主管" "民營事業主管" ...
$ Q33 : dbl+lbl [1:1218] 67, 20, 64, 13, 65, 66, 17, 7, 64, 65, 18, 67, 67, 6...
..@ label : chr "請問您戶籍是在哪一個縣市？"
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:24] 2 4 5 7 8 9 10 13 14 15 ...
.. ..- attr(*, "names")= chr [1:24] "宜蘭縣" "新竹縣" "苗栗縣" "彰化縣" ...
$ Q34 : dbl+lbl [1:1218] 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 9...
..@ label : chr "請問在宜蘭縣哪一個鄉鎮市？"
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:15] 1 2 3 4 5 6 7 8 9 10 ...
.. ..- attr(*, "names")= chr [1:15] "宜蘭市" "羅東鎮" "蘇澳鎮" "頭城鎮" ...
$ Q35 : dbl+lbl [1:1218] 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 9...
..@ label : chr "請問在新竹縣哪一個鄉鎮市？"
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:16] 1 2 3 4 5 6 7 8 9 10 ...
.. ..- attr(*, "names")= chr [1:16] "竹北市" "竹東鎮" "新埔鎮" "關西鎮" ...
$ Q36 : dbl+lbl [1:1218] 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 9...
..@ label : chr "請問在苗栗縣哪一個鄉鎮市？"
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:21] 1 2 3 4 5 6 7 8 9 10 ...
.. ..- attr(*, "names")= chr [1:21] "苗栗市" "苑裡鎮" "通霄鎮" "竹南鎮" ...
$ Q37 : dbl+lbl [1:1218] 99, 99, 99, 99, 99, 99, 99, 19, 99, 99, 99, 99, 99, 9...
..@ label : chr "請問在彰化縣哪一個鄉鎮市？"
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:29] 1 2 3 4 5 6 7 8 9 10 ...
.. ..- attr(*, "names")= chr [1:29] "彰化市" "鹿港鎮" "和美鎮" "線西鄉" ...
$ Q38 : dbl+lbl [1:1218] 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 9...
..@ label : chr "請問在南投縣哪一個鄉鎮市？"
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:16] 1 2 3 4 5 6 7 8 9 10 ...
.. ..- attr(*, "names")= chr [1:16] "南投市" "埔里鎮" "草屯鎮" "竹山鎮" ...
$ Q39 : dbl+lbl [1:1218] 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 9...
..@ label : chr "請問在雲林縣哪一個鄉鎮市？"
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:23] 1 2 3 4 5 6 7 8 9 10 ...
.. ..- attr(*, "names")= chr [1:23] "斗六市" "斗南鎮" "虎尾鎮" "西螺鎮" ...
$ Q40 : dbl+lbl [1:1218] 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 9...
..@ label : chr "請問在嘉義縣哪一個鄉鎮市？"
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:21] 1 2 3 4 5 6 7 8 9 10 ...
.. ..- attr(*, "names")= chr [1:21] "太保市" "朴子市" "布袋鎮" "大林鎮" ...
$ Q41 : dbl+lbl [1:1218] 99, 99, 99, 13, 99, 99, 99, 99, 99, 99, 99, 99, 99, 9...
..@ label : chr "請問在屏東縣哪一個鄉鎮市？"
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:36] 1 2 3 4 5 6 7 8 9 10 ...
.. ..- attr(*, "names")= chr [1:36] "屏東市" "潮洲鎮" "東港鎮" "恆春鎮" ...
$ Q42 : dbl+lbl [1:1218] 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 9...
..@ label : chr "請問在臺東縣哪一個鄉鎮市？"
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:19] 1 2 3 4 5 6 7 8 9 10 ...
.. ..- attr(*, "names")= chr [1:19] "臺東市" "成功鎮" "關山鎮" "卑南鄉" ...
$ Q43 : dbl+lbl [1:1218] 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 9...
..@ label : chr "請問在花蓮縣哪一個鄉鎮市？"
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:16] 1 2 3 4 5 6 7 8 9 10 ...
.. ..- attr(*, "names")= chr [1:16] "花蓮市" "鳳林鎮" "玉里鎮" "新城鄉" ...
$ Q44 : dbl+lbl [1:1218] 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 9...
..@ label : chr "請問在澎湖縣哪一個鄉鎮市？"
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:9] 1 2 3 4 5 6 95 98 99
.. ..- attr(*, "names")= chr [1:9] "馬公市" "湖西鄉" "白沙鄉" "西嶼鄉" ...
$ Q45 : dbl+lbl [1:1218] 99, 99, 99, 99, 99, 99, 95, 99, 99, 99, 99, 99, 99, 9...
..@ label : chr "請問在基隆市哪一個區？"
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:10] 1 2 3 4 5 6 7 95 98 99
.. ..- attr(*, "names")= chr [1:10] "中正區" "七堵區" "暖暖區" "仁愛區" ...
$ Q46 : dbl+lbl [1:1218] 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 1, 99, 99, 9...
..@ label : chr "請問在新竹市哪一個區？"
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:6] 1 2 3 95 98 99
.. ..- attr(*, "names")= chr [1:6] "東區" "北區" "香山區" "拒答" ...
$ Q47 : dbl+lbl [1:1218] 99, 2, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 9...
..@ label : chr "請問在嘉義市哪一個區？"
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:5] 1 2 95 98 99
.. ..- attr(*, "names")= chr [1:5] "東區" "西區" "拒答" "不知道" ...
$ Q48 : dbl+lbl [1:1218] 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 9...
..@ label : chr "請問在臺北市哪一個區？"
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:15] 1 2 3 4 5 6 7 8 9 10 ...
.. ..- attr(*, "names")= chr [1:15] "松山區" "信義區" "大安區" "中山區" ...
$ Q49 : dbl+lbl [1:1218] 99, 99, 12, 99, 99, 99, 99, 99, 15, 99, 99, 99, 99, 9...
..@ label : chr "請問在高雄市哪一個區？"
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:41] 1 2 3 4 5 6 7 8 9 10 ...
.. ..- attr(*, "names")= chr [1:41] "鹽埕區" "鼓山區" "左營區" "楠梓區" ...
$ Q50 : dbl+lbl [1:1218] 99, 99, 99, 99, 5, 99, 99, 99, 99, 5, 99, 99, 99, 9...
..@ label : chr "請問在新北市哪一個區？"
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:32] 1 2 3 4 5 6 7 8 9 10 ...
.. ..- attr(*, "names")= chr [1:32] "板橋區" "三重區" "中和區" "永和區" ...
$ Q51 : dbl+lbl [1:1218] 99, 99, 99, 99, 99, 28, 99, 99, 99, 99, 99, 99, 99, 9...
..@ label : chr "請問在臺中市哪一個區？"
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:32] 1 2 3 4 5 6 7 8 9 10 ...
.. ..- attr(*, "names")= chr [1:32] "中區" "東區" "南區" "西區" ...
$ Q52 : dbl+lbl [1:1218] 36, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 14, 2, 9...
..@ label : chr "請問在臺南市哪一個區？"
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:40] 1 2 3 4 5 6 7 8 9 10 ...
.. ..- attr(*, "names")= chr [1:40] "新營區" "鹽水區" "白河區" "柳營區" ...
$ Q53 : dbl+lbl [1:1218] 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 99, 1...
..@ label : chr "請問在桃園市哪一個區？"
..@ format.spss : chr "F2.0"
..@ display_width: int 5
..@ labels : Named num [1:16] 1 2 3 4 5 6 7 8 9 10 ...
.. ..- attr(*, "names")= chr [1:16] "桃園區" "中壢區" "大溪區" "楊梅區" ...
[list output truncated]# 選題變數清理(homework2)
library(sjmisc)
Attaching package: 'sjmisc'The following object is masked from 'package:tidyr':
replace_nalibrary(sjPlot)
names(data) [1] "ID" "NAME" "TEL_A" "TEL" "TEL_NAME"
[6] "DATE" "BTIME" "ETIME" "RESULT" "CALLER"
[11] "GENDER" "LEVEL" "HOURS" "VERSION" "HOME_A"
[16] "HOME_M" "HOME_O" "SAMPLE" "DATE_1" "BTIME_1"
[21] "ETIME_1" "RESULT_1" "DATE_2" "BTIME_2" "ETIME_2"
[26] "RESULT_2" "DATE_3" "BTIME_3" "ETIME_3" "RESULT_3"
[31] "DATE_4" "BTIME_4" "ETIME_4" "RESULT_4" "DATE_5"
[36] "BTIME_5" "ETIME_5" "RESULT_5" "DATE_6" "BTIME_6"
[41] "ETIME_6" "RESULT_6" "DATE_7" "BTIME_7" "ETIME_7"
[46] "RESULT_7" "Q1" "Q2" "Q3" "Q4"
[51] "Q5" "Q6" "Q7" "Q8" "Q9"
[56] "Q10" "Q11" "Q12" "Q13" "Q14"
[61] "Q15" "Q16" "Q17" "Q18" "Q19"
[66] "Q20" "Q21" "Q22" "Q23" "Q24"
[71] "Q25" "Q26" "Q27" "Q28" "Q29"
[76] "Q30" "Q31" "Q32" "Q33" "Q34"
[81] "Q35" "Q36" "Q37" "Q38" "Q39"
[86] "Q40" "Q41" "Q42" "Q43" "Q44"
[91] "Q45" "Q46" "Q47" "Q48" "Q49"
[96] "Q50" "Q51" "Q52" "Q53" "Q54"
[101] "Q55" "NQ1" "NQ2" "NQ3" "NQ4"
[106] "NQ5" "NQ6" "NQ7" "NQ8" "NQ9"
[111] "NQ10" "NQ11" "NQ12" "NQ13" "NQ14"
[116] "NQ15" "NQ16" "NQ17" "NQ18" "NQ19"
[121] "NQ20" "TYPE" "SEX" "AGE" "EDU"
[126] "SENGI" "SENGI7" "MASENGI" "MASENGI7" "TONDU"
[131] "PARTYID" "PARTY" "PARTYID2" "T_Cidentity" "CAREER"
[136] "CAREER8" "TOWNID" "AAA" "AREAR" "W" library(haven)
data <- read_sav("~/Desktop/draft/作業研究/民主基金會2025調查_臺灣民主價值與治理/PP259762.sav")
library(stringr)
library(tidyr)
library(sjmisc)
data <- set_na(data, na=c(93:99, "NA"))
## Ａ.民主價值與制度信任
##先藉由Ｑ5-11檢視受訪民眾對於民主價值的定義與認知，延伸出對台灣目前民主政治在公共事務上運行的看法，認為樂觀抑或悲觀，咎其原因，並從這些可能性的理由展望未來。選擇的變數分別討論民主制度看法、實行滿意度、情緒態度及政府執政方向等。
# ５．有人說：「民主也許（臺：加減）會有問題，但還是一個最好的制度」，請問您同不同意（臺：咁有同意）這種說法？【訪員請追問強弱程度】
# 01.非常不同意 02.不 同 意 03.同 意 04.非常同意
# 96.看 情 形 97.無 意 見 98.不 知 道 95.拒 答
table(data$Q5)
1 2 3 4
39 117 551 421 data$Q5r <- rec(data$Q5, rec="1=1; 2=2; 3=3; 4=4", as.num = F)
frq(data$Q5r)有人說：「民主也許會有問題，但還是一個最好的制度」，請問您同不同意這種說法？ (x) <categorical>
# total N=1218 valid N=1128 mean=3.20 sd=0.76
Value | Label | N | Raw % | Valid % | Cum. %
---------------------------------------------------
1 | 非常不同意 | 39 | 3.20 | 3.46 | 3.46
2 | 不同意 | 117 | 9.61 | 10.37 | 13.83
3 | 同意 | 551 | 45.24 | 48.85 | 62.68
4 | 非常同意 | 421 | 34.56 | 37.32 | 100.00
<NA> | <NA> | 90 | 7.39 | <NA> | <NA>frq(data$Q5r, weights = data$wr, out="v") Warning: Unknown or uninitialised column: `wr`.Weights `data$wr` not found in data.| val | label | frq | raw.prc | valid.prc | cum.prc | |
| 1 | 非常不同意 | 39 | 3.20 | 3.46 | 3.46 | |
| 2 | 不同意 | 117 | 9.61 | 10.37 | 13.83 | |
| 3 | 同意 | 551 | 45.24 | 48.85 | 62.68 | |
| 4 | 非常同意 | 421 | 34.56 | 37.32 | 100.00 | |
| NA | NA | 90 | 7.39 | NA | NA | |
| total N=1218 · valid N=1128 · x̄=3.20 · σ=0.76 | ||||||
# 性別加權：男53.6%、女46.4
data$sex <- rec(data$Q54, rec="1=男; 2=女; else=NA", as.num=F)
# Q5 加上性別權重分析
table(data$Q5)
1 2 3 4
39 117 551 421 data$Q5r <- rec(data$Q5, rec="1=1; 2=2; 3=3; 4=4; else=NA", as.num=F)
frq(data$Q5r)有人說：「民主也許會有問題，但還是一個最好的制度」，請問您同不同意這種說法？ (x) <categorical>
# total N=1218 valid N=1128 mean=3.20 sd=0.76
Value | N | Raw % | Valid % | Cum. %
--------------------------------------
1 | 39 | 3.20 | 3.46 | 3.46
2 | 117 | 9.61 | 10.37 | 13.83
3 | 551 | 45.24 | 48.85 | 62.68
4 | 421 | 34.56 | 37.32 | 100.00
<NA> | 90 | 7.39 | <NA> | <NA>frq(data$Q5r, weights=data$w_final, out="v")Warning: Unknown or uninitialised column: `w_final`.Weights `data$w_final` not found in data.| val | label | frq | raw.prc | valid.prc | cum.prc | |
| 1 | 39 | 3.20 | 3.46 | 3.46 | ||
| 2 | 117 | 9.61 | 10.37 | 13.83 | ||
| 3 | 551 | 45.24 | 48.85 | 62.68 | ||
| 4 | 421 | 34.56 | 37.32 | 100.00 | ||
| NA | NA | 90 | 7.39 | NA | NA | |
| total N=1218 · valid N=1128 · x̄=3.20 · σ=0.76 | ||||||
# ６．整體而言，請問您對於目前臺灣民主政治實行的情形滿不滿意（臺：咁有滿意）？【訪員請追問強弱程度】
# 01.非常不滿意 02.不 滿 意 03.滿 意 04.非常滿意
# 96.看 情 形 97.無 意 見 98.不 知 道 95.拒 答
table(data$Q6)
1 2 3 4
278 329 427 101 data$Q6r <- rec(data$Q6, rec="1=1; 2=2; 3=3; 4=4", as.num = F)
frq(data$Q6r)整體而言，請問您對於目前臺灣民主政治實行的情形滿不滿意？ (x) <categorical>
# total N=1218 valid N=1135 mean=2.31 sd=0.94
Value | Label | N | Raw % | Valid % | Cum. %
---------------------------------------------------
1 | 非常不滿意 | 278 | 22.82 | 24.49 | 24.49
2 | 不滿意 | 329 | 27.01 | 28.99 | 53.48
3 | 滿意 | 427 | 35.06 | 37.62 | 91.10
4 | 非常滿意 | 101 | 8.29 | 8.90 | 100.00
<NA> | <NA> | 83 | 6.81 | <NA> | <NA>frq(data$Q6r, weights = data$wr, out="v") Warning: Unknown or uninitialised column: `wr`.Weights `data$wr` not found in data.| val | label | frq | raw.prc | valid.prc | cum.prc | |
| 1 | 非常不滿意 | 278 | 22.82 | 24.49 | 24.49 | |
| 2 | 不滿意 | 329 | 27.01 | 28.99 | 53.48 | |
| 3 | 滿意 | 427 | 35.06 | 37.62 | 91.10 | |
| 4 | 非常滿意 | 101 | 8.29 | 8.90 | 100.00 | |
| NA | NA | 83 | 6.81 | NA | NA | |
| total N=1218 · valid N=1135 · x̄=2.31 · σ=0.94 | ||||||
plot_frq(data$Q6r)
# ７．請問您對臺灣民主政治未來的發展是悲觀還是樂觀？【訪員請追問強弱程度】
# 01.非常悲觀 02.悲 觀 03.樂 觀 04.非常樂觀
# 96.看 情 形 97.無 意 見 98.不 知 道 95.拒 答
table(data$Q7)
1 2 3 4
227 348 415 119 data$Q7r <- rec(data$Q7, rec="1=1; 2=2; 3=3; 4=4", as.num = F)
frq(data$Q7r)請問您對臺灣民主政治未來的發展是悲觀還是樂觀？ (x) <categorical>
# total N=1218 valid N=1109 mean=2.38 sd=0.93
Value | Label | N | Raw % | Valid % | Cum. %
-------------------------------------------------
1 | 非常悲觀 | 227 | 18.64 | 20.47 | 20.47
2 | 悲觀 | 348 | 28.57 | 31.38 | 51.85
3 | 樂觀 | 415 | 34.07 | 37.42 | 89.27
4 | 非常樂觀 | 119 | 9.77 | 10.73 | 100.00
<NA> | <NA> | 109 | 8.95 | <NA> | <NA>library(sjmisc)
library(sjlabelled)
Attaching package: 'sjlabelled'The following objects are masked from 'package:haven':
as_factor, read_sas, read_spss, read_stata, write_sas, zap_labelslibrary(sjPlot)
data$Q7r <- rec(data$Q7, rec="1=1; 2=2; 3=3; 4=4", as.num = F)
set_label(data$Q7r) <- "對民主制度的認同"
data$Q7r <- set_labels(data$Q7r, labels = c("非常不同意" = 1,
"不同意" = 2,
"同意" = 3,
"非常同意" = 4))
frq(data$Q7r)對民主制度的認同 (x) <categorical>
# total N=1218 valid N=1109 mean=2.38 sd=0.93
Value | Label | N | Raw % | Valid % | Cum. %
---------------------------------------------------
1 | 非常不同意 | 227 | 18.64 | 20.47 | 20.47
2 | 不同意 | 348 | 28.57 | 31.38 | 51.85
3 | 同意 | 415 | 34.07 | 37.42 | 89.27
4 | 非常同意 | 119 | 9.77 | 10.73 | 100.00
<NA> | <NA> | 109 | 8.95 | <NA> | <NA>plot_frq(data$Q7r)
# ８．有人說：「政府所做的事大多數是正確的」，請問您同不同意（臺：咁有同意）這種說法？【訪員請追問強弱程度】
# 01.非常不同意 02.不 同 意 03.同 意 04.非常同意
# 96.看 情 形 97.無 意 見 98.不 知 道 95.拒 答
table(data$Q8)
1 2 3 4
300 410 326 92 data$Q8r <- rec(data$Q8, rec="1=1; 2=2; 3=3; 4=4", as.num = F)
frq(data$Q8r)有人說：「政府所做的事大多數是正確的」，請問您同不同意這種說法？ (x) <categorical>
# total N=1218 valid N=1128 mean=2.19 sd=0.92
Value | Label | N | Raw % | Valid % | Cum. %
---------------------------------------------------
1 | 非常不同意 | 300 | 24.63 | 26.60 | 26.60
2 | 不同意 | 410 | 33.66 | 36.35 | 62.94
3 | 同意 | 326 | 26.77 | 28.90 | 91.84
4 | 非常同意 | 92 | 7.55 | 8.16 | 100.00
<NA> | <NA> | 90 | 7.39 | <NA> | <NA>frq(data$Q8r, weights = data$wr, out="v") Warning: Unknown or uninitialised column: `wr`.Weights `data$wr` not found in data.| val | label | frq | raw.prc | valid.prc | cum.prc | |
| 1 | 非常不同意 | 300 | 24.63 | 26.60 | 26.60 | |
| 2 | 不同意 | 410 | 33.66 | 36.35 | 62.94 | |
| 3 | 同意 | 326 | 26.77 | 28.90 | 91.84 | |
| 4 | 非常同意 | 92 | 7.55 | 8.16 | 100.00 | |
| NA | NA | 90 | 7.39 | NA | NA | |
| total N=1218 · valid N=1128 · x̄=2.19 · σ=0.92 | ||||||
plot_frq(data$Q8r)
# ９．有人說：「對於公眾的事務，我們都應該主動來參與」；也有人說：「公眾的事務交給政府處
# 理就好，我們少管為妙」，請問您比較同意（臺：卡同意）哪一種說法？
# 01.我們都應該主動來參與 02.交給政府處理就好，我們少管為妙
# 96.看 情 形 97.無 意 見 98.不 知 道 95.拒 答
table(data$Q9)
1 2
852 232 data$Q9r <- rec(data$Q9, rec="1=1; 2=2", as.num = F)
frq(data$Q9r)有人說：「對於公眾的事務，我們都應該主動來參與」；也有人說：「公眾的事務交給政府處理就好，我們少管為妙」，請問您比較同意哪一種說法？ (x) <categorical>
# total N=1218 valid N=1084 mean=1.21 sd=0.41
Value | Label | N | Raw % | Valid % | Cum. %
---------------------------------------------------------------------------------
1 | 對於公眾的事務，我們都應該主動來參與 | 852 | 69.95 | 78.60 | 78.60
2 | 公眾的事務交給政府處理就好，我們少管為妙 | 232 | 19.05 | 21.40 | 100.00
<NA> | <NA> | 134 | 11.00 | <NA> | <NA>frq(data$Q9r, weights = data$wr, out="v") Warning: Unknown or uninitialised column: `wr`.Weights `data$wr` not found in data.| val | label | frq | raw.prc | valid.prc | cum.prc | |
| 1 | 對於公眾的事務，我們都應該主動來參與 | 852 | 69.95 | 78.60 | 78.60 | |
| 2 | 公眾的事務交給政府處理就好，我們少管為妙 | 232 | 19.05 | 21.40 | 100.00 | |
| NA | NA | 134 | 11.00 | NA | NA | |
| total N=1218 · valid N=1084 · x̄=1.21 · σ=0.41 | ||||||
plot_frq(data$Q9r)
# １０．有人說：「政府常浪費納稅人繳的稅金」，請問您同不同意（臺：咁有同意）這種說法？【訪員請追問強弱程度】
# 01.非常不同意 02.不 同 意 03.同 意 04.非常同意
# 96.看 情 形 97.無 意 見 98.不 知 道 95.拒 答
table(data$Q10)
1 2 3 4
93 294 339 378 data$Q10r <- rec(data$Q10, rec="1=1; 2=2; 3=3; 4=4", as.num = F)
frq(data$Q10r)有人說：「政府常浪費納稅人繳的稅金」，請問您同不同意這種說法？ (x) <categorical>
# total N=1218 valid N=1104 mean=2.91 sd=0.97
Value | Label | N | Raw % | Valid % | Cum. %
---------------------------------------------------
1 | 非常不同意 | 93 | 7.64 | 8.42 | 8.42
2 | 不同意 | 294 | 24.14 | 26.63 | 35.05
3 | 同意 | 339 | 27.83 | 30.71 | 65.76
4 | 非常同意 | 378 | 31.03 | 34.24 | 100.00
<NA> | <NA> | 114 | 9.36 | <NA> | <NA>frq(data$Q10r, weights = data$wr, out="v") Warning: Unknown or uninitialised column: `wr`.Weights `data$wr` not found in data.| val | label | frq | raw.prc | valid.prc | cum.prc | |
| 1 | 非常不同意 | 93 | 7.64 | 8.42 | 8.42 | |
| 2 | 不同意 | 294 | 24.14 | 26.63 | 35.05 | |
| 3 | 同意 | 339 | 27.83 | 30.71 | 65.76 | |
| 4 | 非常同意 | 378 | 31.03 | 34.24 | 100.00 | |
| NA | NA | 114 | 9.36 | NA | NA | |
| total N=1218 · valid N=1104 · x̄=2.91 · σ=0.97 | ||||||
plot_frq(data$Q10r)
# １１．請問您相不相信政府官員說的話？【訪員請追問強弱程度】
# 01.非常不相信 02.不 相 信 03.相 信 04.非常相信
# 96.看 情 形 97.無 意 見 98.不 知 道 95.拒 答
table(data$Q11)
1 2 3 4
250 402 358 46 data$Q11r <- rec(data$Q11, rec="1=1; 2=2; 3=3; 4=4", as.num = F)
frq(data$Q11r)請問您相不相信政府官員說的話？ (x) <categorical>
# total N=1218 valid N=1056 mean=2.19 sd=0.85
Value | Label | N | Raw % | Valid % | Cum. %
---------------------------------------------------
1 | 非常不相信 | 250 | 20.53 | 23.67 | 23.67
2 | 不相信 | 402 | 33.00 | 38.07 | 61.74
3 | 相信 | 358 | 29.39 | 33.90 | 95.64
4 | 非常相信 | 46 | 3.78 | 4.36 | 100.00
<NA> | <NA> | 162 | 13.30 | <NA> | <NA>frq(data$Q11r, weights = data$wr, out="v") Warning: Unknown or uninitialised column: `wr`.Weights `data$wr` not found in data.| val | label | frq | raw.prc | valid.prc | cum.prc | |
| 1 | 非常不相信 | 250 | 20.53 | 23.67 | 23.67 | |
| 2 | 不相信 | 402 | 33.00 | 38.07 | 61.74 | |
| 3 | 相信 | 358 | 29.39 | 33.90 | 95.64 | |
| 4 | 非常相信 | 46 | 3.78 | 4.36 | 100.00 | |
| NA | NA | 162 | 13.30 | NA | NA | |
| total N=1218 · valid N=1056 · x̄=2.19 · σ=0.85 | ||||||
plot_frq(data$Q11r)
## B. 國際與兩岸互動態度:
## 本區塊討論台灣外交互動的傾向，並以目前世界體系的兩大強權美國、中國為探討標的，了解台灣民眾對兩國的政體國體、政經交流各種層次認知後，主觀對於兩個國家的印象。
# １７．我們社會上常常有人討論臺灣要如何跟中國大陸互動（臺：交往） ，如果用 0 來表示臺灣
# 跟中國大陸的互動（臺：交往）應該愈疏遠愈好，用 10 表示應該愈密切愈好，請問0～10您會給多少？
# 95.拒答 98.不知道
frq(data$Q17)我們社會上常常有人討論臺灣要如何跟中國大陸互動，如果用0來表示臺灣跟跟中國大陸的互動應該愈疏遠愈好，用10表示應該愈密切愈好，請問0?10您會給多少？ (x) <numeric>
# total N=1218 valid N=1112 mean=5.06 sd=2.39
Value | Label | N | Raw % | Valid % | Cum. %
---------------------------------------------------------------------------
0 | 臺灣跟中國大陸的互動應該愈疏遠愈好 | 82 | 6.73 | 7.37 | 7.37
1 | 1 | 29 | 2.38 | 2.61 | 9.98
2 | 2 | 40 | 3.28 | 3.60 | 13.58
3 | 3 | 93 | 7.64 | 8.36 | 21.94
4 | 4 | 62 | 5.09 | 5.58 | 27.52
5 | 5 | 402 | 33.00 | 36.15 | 63.67
6 | 6 | 141 | 11.58 | 12.68 | 76.35
7 | 7 | 105 | 8.62 | 9.44 | 85.79
8 | 8 | 85 | 6.98 | 7.64 | 93.44
9 | 9 | 14 | 1.15 | 1.26 | 94.69
10 | 臺灣跟中國大陸的互動應該愈密切愈好 | 59 | 4.84 | 5.31 | 100.00
<NA> | <NA> | 106 | 8.70 | <NA> | <NA>plot_frq(data$Q17, type="hist")
data$Q17.new <- rec(data$Q17,
rec="0:3=1; 4:6=2 ;7:10=3")
frq(data$Q17.new)我們社會上常常有人討論臺灣要如何跟中國大陸互動，如果用0來表示臺灣跟跟中國大陸的互動應該愈疏遠愈好，用10表示應該愈密切愈好，請問0?10您會給多少？ (x) <numeric>
# total N=1218 valid N=1112 mean=2.02 sd=0.68
Value | N | Raw % | Valid % | Cum. %
--------------------------------------
1 | 244 | 20.03 | 21.94 | 21.94
2 | 605 | 49.67 | 54.41 | 76.35
3 | 263 | 21.59 | 23.65 | 100.00
<NA> | 106 | 8.70 | <NA> | <NA># １８．我們社會上常常有人討論臺灣要如何跟美國互動（臺：交往） ，如果用0 來表示臺灣跟美
# 國的互動（臺：交往）應該愈疏遠愈好，用10 表示應該愈密切愈好，請問 0～10 您會給
# 多少？
# 95.拒答 98.不知道
frq(data$Q18)我們社會上常常有人討論臺灣要如何跟美國互動，如果用0來表示臺灣跟美國的互動應該愈疏遠愈好，用10表示應該愈密切愈好，請問0?10您會給多少？ (x) <numeric>
# total N=1218 valid N=1118 mean=6.26 sd=2.13
Value | Label | N | Raw % | Valid % | Cum. %
-----------------------------------------------------------------------
0 | 臺灣跟美國的互動應該愈疏遠愈好 | 24 | 1.97 | 2.15 | 2.15
1 | 1 | 10 | 0.82 | 0.89 | 3.04
2 | 2 | 14 | 1.15 | 1.25 | 4.29
3 | 3 | 33 | 2.71 | 2.95 | 7.25
4 | 4 | 31 | 2.55 | 2.77 | 10.02
5 | 5 | 374 | 30.71 | 33.45 | 43.47
6 | 6 | 142 | 11.66 | 12.70 | 56.17
7 | 7 | 175 | 14.37 | 15.65 | 71.82
8 | 8 | 166 | 13.63 | 14.85 | 86.67
9 | 9 | 32 | 2.63 | 2.86 | 89.53
10 | 臺灣跟美國的互動應該愈密切愈好 | 117 | 9.61 | 10.47 | 100.00
<NA> | <NA> | 100 | 8.21 | <NA> | <NA>plot_frq(data$Q18, type="hist")
data$Q18.new <- rec(data$Q18,
rec="0:3=1; 4:6=2 ;7:10=3")
frq(data$Q18.new)我們社會上常常有人討論臺灣要如何跟美國互動，如果用0來表示臺灣跟美國的互動應該愈疏遠愈好，用10表示應該愈密切愈好，請問0?10您會給多少？ (x) <numeric>
# total N=1218 valid N=1118 mean=2.37 sd=0.61
Value | N | Raw % | Valid % | Cum. %
--------------------------------------
1 | 81 | 6.65 | 7.25 | 7.25
2 | 547 | 44.91 | 48.93 | 56.17
3 | 490 | 40.23 | 43.83 | 100.00
<NA> | 100 | 8.21 | <NA> | <NA>## C. 政治認同與政黨傾向
## 了解受訪族群的政治意識型態、國族認同和政黨傾向偏好，連結Ｂ單元題組對於中、美的情感依附態度和偏好，並延伸與後續Ｄ單元所探討的受訪族群分佈、性別、教育背景等，試圖釐其中控制變因彼此的關聯性，探討其是否成為建構民主價值認知的核心因素。
# ２２．在目前國內的政黨中，請問您認為您比較支持哪一個政黨？（回答「選人不選黨」者，請追問「非選舉時期」整體而言較支持哪一個政黨）
# 01.國民黨 02.民進黨 03.新黨 04.親民黨 05.臺聯
# 20.綠黨 21.時代力量 23.社民黨 35.臺灣基進 38.台灣民眾黨
# 06.都支持 07.都不支持 96.看情形 97.無意見 98.不知道 95.拒答 90.其他
frq(data$Q22)在目前國內的政黨中，請問您認為您比較支持哪一個政黨？ (x) <numeric>
# total N=1218 valid N=1069 mean=7.56 sd=10.78
Value | Label | N | Raw % | Valid % | Cum. %
-----------------------------------------------------------
1 | 國民黨 | 222 | 18.23 | 20.77 | 20.77
2 | 民進黨 | 359 | 29.47 | 33.58 | 54.35
3 | 新黨 | 0 | 0.00 | 0.00 | 54.35
4 | 親民黨 | 0 | 0.00 | 0.00 | 54.35
5 | 臺聯 | 0 | 0.00 | 0.00 | 54.35
6 | 都支持 | 68 | 5.58 | 6.36 | 60.71
7 | 都不支持 | 268 | 22.00 | 25.07 | 85.78
8 | 國民黨加民進黨 | 0 | 0.00 | 0.00 | 85.78
16 | 泛藍 | 2 | 0.16 | 0.19 | 85.97
17 | 泛綠 | 1 | 0.08 | 0.09 | 86.06
18 | 在野黨 | 0 | 0.00 | 0.00 | 86.06
19 | 選人不選黨 | 40 | 3.28 | 3.74 | 89.80
20 | 綠黨 | 1 | 0.08 | 0.09 | 89.90
21 | 時代力量 | 4 | 0.33 | 0.37 | 90.27
23 | 社民黨 | 2 | 0.16 | 0.19 | 90.46
29 | 中華統一促進黨 | 0 | 0.00 | 0.00 | 90.46
35 | 台灣基進 | 0 | 0.00 | 0.00 | 90.46
38 | 台灣民眾黨 | 99 | 8.13 | 9.26 | 99.72
42 | 台澎黨 | 1 | 0.08 | 0.09 | 99.81
45 | 臺灣動物保護黨 | 1 | 0.08 | 0.09 | 99.91
46 | 小民參政歐巴桑聯盟 | 0 | 0.00 | 0.00 | 99.91
49 | 麻將最大黨 | 0 | 0.00 | 0.00 | 99.91
51 | 勞動黨 | 0 | 0.00 | 0.00 | 99.91
52 | 人民最大黨 | 1 | 0.08 | 0.09 | 100.00
<NA> | <NA> | 149 | 12.23 | <NA> | <NA>data$Q22 <- rec(data$Q22, rec="06,07,96,97,98,95,90=NA; else=copy", as.num = F)
data$blue <- rec(data$Q22, rec="1,4=1; else=0", as.num = F)
data$green <- rec(data$Q22, rec="2,3,5,20,21,23,35=1; else=0", as.num = F)
# ２２ａ．請問您支持（受訪者回答的黨）的程度是非常支持，還是普普通通？
# 01. 非常支持 02. 普普通通
table(data$Q23)
1 2
274 416 data$Q22a <- rec(data$Q23, rec="1=1; 2=2", as.num = F)
frq(data$Q22a)請問您支持〔受訪者回答的政黨〕的程度是非常支持、還是普普通通？ (x) <categorical>
# total N=1218 valid N=690 mean=1.60 sd=0.49
Value | Label | N | Raw % | Valid % | Cum. %
-------------------------------------------------
1 | 非常支持 | 274 | 22.50 | 39.71 | 39.71
2 | 普普通通 | 416 | 34.15 | 60.29 | 100.00
<NA> | <NA> | 528 | 43.35 | <NA> | <NA># ２２ｂ．那請問您有沒有比較偏向哪一個政黨？
# 03.偏國民黨 04.偏民進黨 05.偏新黨 06.偏親民黨 07.偏臺聯 23.偏綠黨 24.偏時代力量 26.偏社民黨 38.偏台灣基進 41.偏台灣民眾黨
# 08.都不偏 90.其他96.看情形 97.無意見 98.不知道 95.拒答
data$Q22b <- rec(data$Q24, rec="06,07,96,97,98,95,90=NA; else=copy", as.num = F)
data$blue[data$Q22b==c(1,4,35)] <- 1
data$green[data$Q22b==c(2,3,5,20,21,23,35)] <- 1
table(data$blue)
0 1
511 231 table(data$green)
0 1
367 371 # ２３．其為數據第25題，在我們社會上，有人說自己是「臺灣人」，也有人說自己是「中國人」，也有人說都是。請問您認為您自己是「臺灣人」、「中國人」，或都是？
# 01.臺 灣 人 02.都 是 03.中 國 人
# 96.很 難 說 97.無 意 見 98.不 知 道 95 拒 答
table(data$Q25)
1 2 3
704 430 34 str(data$Q25) dbl+lbl [1:1218] 1, 1, 2, 1, 1, 2, 1, 1, 1, 2, NA, 2, 2, 1, ...
@ label : chr "在我們社會上，有人說自己是「臺灣人」，也有人說自己是「中國人」，也有人說都是。請問您認為您自己是「臺灣人」、「"| __truncated__
@ format.spss : chr "F2.0"
@ display_width: int 5
@ labels : Named num [1:3] 1 2 3
..- attr(*, "names")= chr [1:3] "臺灣人" "都是" "中國人"data$Q25[data$Q25 %in% c(95,96,97,98)] <- NA
data$twnese <- rec(data$Q25, rec="1=1; else=0", as.num = F)
# 臺灣人
data$bothtwcn <- rec(data$Q25, rec="2=1; else=0", as.num = F)
# 都是
data$cnese <- rec(data$Q25, rec="3=1; else=0", as.num = F)
# 中國人
frq(data$twnese)在我們社會上，有人說自己是「臺灣人」，也有人說自己是「中國人」，也有人說都是。請問您認為您自己是「臺灣人」、「中國人」，或者都是？ (x) <categorical>
# total N=1218 valid N=1168 mean=0.60 sd=0.49
Value | N | Raw % | Valid % | Cum. %
--------------------------------------
0 | 464 | 38.10 | 39.73 | 39.73
1 | 704 | 57.80 | 60.27 | 100.00
<NA> | 50 | 4.11 | <NA> | <NA>frq(data$bothtwcn)在我們社會上，有人說自己是「臺灣人」，也有人說自己是「中國人」，也有人說都是。請問您認為您自己是「臺灣人」、「中國人」，或者都是？ (x) <categorical>
# total N=1218 valid N=1168 mean=0.37 sd=0.48
Value | N | Raw % | Valid % | Cum. %
--------------------------------------
0 | 738 | 60.59 | 63.18 | 63.18
1 | 430 | 35.30 | 36.82 | 100.00
<NA> | 50 | 4.11 | <NA> | <NA>frq(data$cnese)在我們社會上，有人說自己是「臺灣人」，也有人說自己是「中國人」，也有人說都是。請問您認為您自己是「臺灣人」、「中國人」，或者都是？ (x) <categorical>
# total N=1218 valid N=1168 mean=0.03 sd=0.17
Value | N | Raw % | Valid % | Cum. %
---------------------------------------
0 | 1134 | 93.10 | 97.09 | 97.09
1 | 34 | 2.79 | 2.91 | 100.00
<NA> | 50 | 4.11 | <NA> | <NA>## D. 社會背景控制變項:
## 本單元摘錄問卷針對受訪民眾的背景探討，作為重要的分析控制變數。
# ２４．請問您是民國那一年出生的？（說不出的改問：您今年幾歲？由訪員換算成出生年：即114－歲數＝出生年次），其為數據第26題
# _________ 年 995.拒答
data$age <- 114-data$Q26
hist(table(data$age))
data$generation <- NA
data$generation[data$age >= 84] <- 1
data$generation[data$age >= 63 & data$age <= 83] <- 2
data$generation[data$age >= 47 & data$age <= 62] <- 3
data$generation[data$age >= 37 & data$age <= 46] <- 4
data$generation[data$age >= 27 & data$age <= 36] <- 5
data$generation[data$age <= 26] <- 6
plot_frq(data$generation)
table(data$generation)
1 2 3 4 5 6
25 392 383 186 145 71 # ２５．請問您的最高學歷是什麼（臺：讀到什麼學校）？其為數據第27題
# 01.不識字及未入學 02.小 學 03.國、初中 04.高中、職
# 05.專 科 06.大 學 07.研究所及以上 95.拒 答
table(data$Q27)
1 2 3 4 5 6 7
23 63 78 322 178 409 136 data$Q25r <- rec(data$Q27, rec="1=1; 2=2; 3=3; 4=4; 5=5; 6=6; 7=7", as.num = F)
frq(data$Q25r)請問您的最高學歷是什麼？ (x) <categorical>
# total N=1218 valid N=1209 mean=4.94 sd=1.44
Value | Label | N | Raw % | Valid % | Cum. %
-------------------------------------------------------
1 | 不識字及未入學 | 23 | 1.89 | 1.90 | 1.90
2 | 小學 | 63 | 5.17 | 5.21 | 7.11
3 | 國、初中 | 78 | 6.40 | 6.45 | 13.56
4 | 高中、職 | 322 | 26.44 | 26.63 | 40.20
5 | 專科 | 178 | 14.61 | 14.72 | 54.92
6 | 大學 | 409 | 33.58 | 33.83 | 88.75
7 | 研究所及以上 | 136 | 11.17 | 11.25 | 100.00
<NA> | <NA> | 9 | 0.74 | <NA> | <NA>plot_frq(data$Q25r)
# ２６．請問您的父親是本省客家人、本省閩南（河洛）人、大陸各省市人、原住民，還是新住民？若受訪者回答「新住民」，請訪員追問是來自中國大陸還是其他地區
# 其為數據第28題
# 01.本省客家人 02.本省閩南人 03.大陸各省市人 04.原 住 民
# 06.大陸新住民 07.外國新住民 95.拒 答 98.不知道
table(data$Q28)
1 2 3 4 5 7
142 903 106 21 3 3 data$Q26r <- rec(data$Q28, rec="1=1; 2=2; 3=3; 4=4; 6=6; 7=7", as.num = F)
frq(data$Q26r)請問您的父親是本省客家人、本省閩南人、大陸各省市人、原住民，還是新住民？ (x) <categorical>
# total N=1218 valid N=1175 mean=2.02 sd=0.59
Value | Label | N | Raw % | Valid % | Cum. %
-----------------------------------------------------
1 | 本省客家人 | 142 | 11.66 | 12.09 | 12.09
2 | 本省閩南人 | 903 | 74.14 | 76.85 | 88.94
3 | 大陸各省市人 | 106 | 8.70 | 9.02 | 97.96
4 | 原住民 | 21 | 1.72 | 1.79 | 99.74
6 | 大陸新住民 | 0 | 0.00 | 0.00 | 99.74
7 | 外國新住民 | 3 | 0.25 | 0.26 | 100.00
<NA> | <NA> | 43 | 3.53 | <NA> | <NA># ２７．請問您的母親是本省客家人、本省閩南（河洛）人、大陸各省市人、原住民，還是新住民？【若受訪者回答「新住民」，請訪員追問是來自中國大陸還是其他地區】
# 其為數據第29題
# 01.本省客家人 02.本省閩南人 03.大陸各省市人 04.原 住 民
# 06.大陸新住民 07.外國新住民 95.拒 答 98.不知道
table(data$Q29)
1 2 3 4 5 6 7
150 944 51 22 3 2 11 data$Q27r <- rec(data$Q29, rec="1=1; 2=2; 3=3; 4=4; 6=6; 7=7", as.num = F)
frq(data$Q27r)請問您的母親是本省客家人、本省閩南人、大陸各省市人、原住民，還是新住民？ (x) <categorical>
# total N=1218 valid N=1180 mean=2.01 sd=0.71
Value | Label | N | Raw % | Valid % | Cum. %
-----------------------------------------------------
1 | 本省客家人 | 150 | 12.32 | 12.71 | 12.71
2 | 本省閩南人 | 944 | 77.50 | 80.00 | 92.71
3 | 大陸各省市人 | 51 | 4.19 | 4.32 | 97.03
4 | 原住民 | 22 | 1.81 | 1.86 | 98.90
6 | 大陸新住民 | 2 | 0.16 | 0.17 | 99.07
7 | 外國新住民 | 11 | 0.90 | 0.93 | 100.00
<NA> | <NA> | 38 | 3.12 | <NA> | <NA># ２８．請問您的職業是什麼？其為數據第30-32題
library(dplyr)
Attaching package: 'dplyr'The following object is masked from 'package:sjlabelled':
as_labelThe following objects are masked from 'package:stats':
filter, lagThe following objects are masked from 'package:base':
intersect, setdiff, setequal, unionlibrary(sjmisc)
library(sjPlot)
# 選取 Q30 ~ Q32
subset_data <- data %>% select(Q30:Q32)
# 用 sjPlot 看題目與分佈
view_df(subset_data)| ID | Name | Label | Values | Value Labels |
| 1 | Q30 | 請問您的職業是什麼？ | 101 102 103 104 105 106 201 202 203 204 205 206 207 208 209 <...> |
民意代表 政府行政主管 公營事業主管 民營事業主管 民營事業公司負責人(自營商人)，有雇用人 民營事業公司負責人(自營商人)，沒有雇用人 政府部門研究人員(科學家) 私人部門研究人員(科學家) 公立醫療單位醫事技術人員（醫師、藥師、護士、醫療人員） 非公立醫療單位醫事技術人員（醫師、藥師、護士、醫療人員） 會計師 公立教育機構教師 私立教育機構教師 法官、書記官、檢察官、司法官 律師 <... truncated> |
| 2 | Q31 | 請問您先生（或太太）的職業是什麼？ | 101 102 103 104 105 106 201 202 203 204 205 206 207 208 209 <...> |
民代 政府行政主管 公營事業主管 民營事業主管 民營事業公司負責人(自營商人)，有雇用人 民營事業公司負責人(自營商人)，沒有雇用人 政府部門研究人員(科學家) 私人部門研究人員(科學家) 公立醫療單位醫事技術人員(醫師、藥師、護士、醫療人員) 非公立醫療單位醫事技術人員(醫師、藥師、護士、醫療人員) 會計師 公立教育機構教師 私立教育機構教師 法官、書記官、檢察官、司法官 律師 <... truncated> |
| 3 | Q32 | 請問您以前（或退休前）的職業是什麼？ | 101 102 103 104 105 106 201 202 203 204 205 206 207 208 209 <...> |
民代 政府行政主管 公營事業主管 民營事業主管 民營事業公司負責人(自營商人)，有雇用人 民營事業公司負責人(自營商人)，沒有雇用人 政府部門研究人員(科學家) 私人部門研究人員(科學家) 公立醫療單位醫事技術人員(醫師、藥師、護士、醫療人員) 非公立醫療單位醫事技術人員(醫師、藥師、護士、醫療人員) 會計師 公立教育機構教師 私立教育機構教師 法官、書記官、檢察官、司法官 律師 <... truncated> |
# 或 sjmisc 看統計
frq(subset_data)請問您的職業是什麼？ (Q30) <numeric>
# total N=1218 valid N=1218 mean=525.57 sd=313.70
Value | Label | N | Raw %
------------------------------------------------------------------------------
101 | 民意代表 | 0 | 0.00
102 | 政府行政主管 | 6 | 0.49
103 | 公營事業主管 | 1 | 0.08
104 | 民營事業主管 | 91 | 7.47
105 | 民營事業公司負責人(自營商人)，有雇用人 | 67 | 5.50
106 | 民營事業公司負責人(自營商人)，沒有雇用人 | 43 | 3.53
201 | 政府部門研究人員(科學家) | 0 | 0.00
202 | 私人部門研究人員(科學家) | 2 | 0.16
203 | 公立醫療單位醫事技術人員（醫師、藥師、護士、醫療人員） | 6 | 0.49
204 | 非公立醫療單位醫事技術人員（醫師、藥師、護士、醫療人員） | 16 | 1.31
205 | 會計師 | 1 | 0.08
206 | 公立教育機構教師 | 28 | 2.30
207 | 私立教育機構教師 | 11 | 0.90
208 | 法官、書記官、檢察官、司法官 | 0 | 0.00
209 | 律師 | 1 | 0.08
210 | 宗教工作者 | 2 | 0.16
211 | 藝術工作者（演員、表演工作者、攝影師） | 2 | 0.16
212 | 文字工作者(作家、記者、劇作家) | 1 | 0.08
213 | 公營事業工程師(機師) | 1 | 0.08
214 | 民營事業工程師(機師) | 45 | 3.69
215 | 職業運動專業人士 | 1 | 0.08
301 | 政府單位與公營事業部門職員 | 33 | 2.71
302 | 民營事業職員 | 154 | 12.64
303 | 買賣業務人員 | 8 | 0.66
401 | 服務、餐旅人員(含攤販、個人服務、計程車司機) | 38 | 3.12
501 | 農林漁牧 | 36 | 2.96
601 | 政府單位與公營事業部門勞工 | 13 | 1.07
602 | 民營事業勞工 | 177 | 14.53
701 | 學生 | 29 | 2.38
801 | 軍警調查局人員 | 2 | 0.16
901 | 家管，沒有做家庭代工 | 57 | 4.68
902 | 家管，有做家庭代工 | 5 | 0.41
903 | 家管，家裡有事業，有幫忙但未領薪水 | 4 | 0.33
904 | 家管，家裡有事業，有幫忙且領薪水 | 7 | 0.57
905 | 失業者 | 29 | 2.38
906 | 退休者 | 287 | 23.56
907 | 無正式職業，但有其他收入 | 4 | 0.33
911 | 一直無業 | 2 | 0.16
995 | 拒答 | 8 | 0.66
<NA> | <NA> | 0 | 0.00
Value | Valid % | Cum. %
------------------------
101 | 0.00 | 0.00
102 | 0.49 | 0.49
103 | 0.08 | 0.57
104 | 7.47 | 8.05
105 | 5.50 | 13.55
106 | 3.53 | 17.08
201 | 0.00 | 17.08
202 | 0.16 | 17.24
203 | 0.49 | 17.73
204 | 1.31 | 19.05
205 | 0.08 | 19.13
206 | 2.30 | 21.43
207 | 0.90 | 22.33
208 | 0.00 | 22.33
209 | 0.08 | 22.41
210 | 0.16 | 22.58
211 | 0.16 | 22.74
212 | 0.08 | 22.82
213 | 0.08 | 22.91
214 | 3.69 | 26.60
215 | 0.08 | 26.68
301 | 2.71 | 29.39
302 | 12.64 | 42.04
303 | 0.66 | 42.69
401 | 3.12 | 45.81
501 | 2.96 | 48.77
601 | 1.07 | 49.84
602 | 14.53 | 64.37
701 | 2.38 | 66.75
801 | 0.16 | 66.91
901 | 4.68 | 71.59
902 | 0.41 | 72.00
903 | 0.33 | 72.33
904 | 0.57 | 72.91
905 | 2.38 | 75.29
906 | 23.56 | 98.85
907 | 0.33 | 99.18
911 | 0.16 | 99.34
995 | 0.66 | 100.00
<NA> | <NA> | <NA>
請問您先生（或太太）的職業是什麼？ (Q31) <numeric>
# total N=1218 valid N=1218 mean=961.32 sd=162.48
Value | Label | N | Raw %
-----------------------------------------------------------------------------
101 | 民代 | 0 | 0.00
102 | 政府行政主管 | 0 | 0.00
103 | 公營事業主管 | 2 | 0.16
104 | 民營事業主管 | 8 | 0.66
105 | 民營事業公司負責人(自營商人)，有雇用人 | 10 | 0.82
106 | 民營事業公司負責人(自營商人)，沒有雇用人 | 8 | 0.66
201 | 政府部門研究人員(科學家) | 0 | 0.00
202 | 私人部門研究人員(科學家) | 0 | 0.00
203 | 公立醫療單位醫事技術人員(醫師、藥師、護士、醫療人員) | 0 | 0.00
204 | 非公立醫療單位醫事技術人員(醫師、藥師、護士、醫療人員) | 0 | 0.00
205 | 會計師 | 0 | 0.00
206 | 公立教育機構教師 | 0 | 0.00
207 | 私立教育機構教師 | 0 | 0.00
208 | 法官、書記官、檢察官、司法官 | 0 | 0.00
209 | 律師 | 0 | 0.00
210 | 宗教工作者 | 0 | 0.00
211 | 藝術工作者(演員、表演工作者、攝影師) | 0 | 0.00
212 | 文字工作者(作家、記者、劇作家) | 0 | 0.00
213 | 公營事業工程師(機師) | 0 | 0.00
214 | 民營事業工程師(機師) | 2 | 0.16
215 | 職業運動專業人士 | 0 | 0.00
301 | 政府單位與公營事業部門職員 | 5 | 0.41
302 | 民營事業職員 | 5 | 0.41
303 | 買賣業務人員 | 1 | 0.08
401 | 服務、餐旅人員(含攤販、個人服務、計程車司機) | 2 | 0.16
501 | 農林漁牧 | 5 | 0.41
601 | 政府單位與公營事業部門勞工 | 3 | 0.25
602 | 民營事業勞工 | 15 | 1.23
701 | 學生 | 0 | 0.00
801 | 軍警調查局人員 | 1 | 0.08
901 | 配偶已去逝 | 6 | 0.49
902 | 沒有配偶(含已離異) | 0 | 0.00
907 | 無正式職業，但有其他收入 | 0 | 0.00
911 | 一直無業 | 0 | 0.00
995 | 拒答 | 0 | 0.00
999 | 跳題 | 1145 | 94.01
<NA> | <NA> | 0 | 0.00
Value | Valid % | Cum. %
------------------------
101 | 0.00 | 0.00
102 | 0.00 | 0.00
103 | 0.16 | 0.16
104 | 0.66 | 0.82
105 | 0.82 | 1.64
106 | 0.66 | 2.30
201 | 0.00 | 2.30
202 | 0.00 | 2.30
203 | 0.00 | 2.30
204 | 0.00 | 2.30
205 | 0.00 | 2.30
206 | 0.00 | 2.30
207 | 0.00 | 2.30
208 | 0.00 | 2.30
209 | 0.00 | 2.30
210 | 0.00 | 2.30
211 | 0.00 | 2.30
212 | 0.00 | 2.30
213 | 0.00 | 2.30
214 | 0.16 | 2.46
215 | 0.00 | 2.46
301 | 0.41 | 2.87
302 | 0.41 | 3.28
303 | 0.08 | 3.37
401 | 0.16 | 3.53
501 | 0.41 | 3.94
601 | 0.25 | 4.19
602 | 1.23 | 5.42
701 | 0.00 | 5.42
801 | 0.08 | 5.50
901 | 0.49 | 5.99
902 | 0.00 | 5.99
907 | 0.00 | 5.99
911 | 0.00 | 5.99
995 | 0.00 | 5.99
999 | 94.01 | 100.00
<NA> | <NA> | <NA>
請問您以前（或退休前）的職業是什麼？ (Q32) <numeric>
# total N=1218 valid N=1218 mean=829.90 sd=310.17
Value | Label | N | Raw %
----------------------------------------------------------------------------
101 | 民代 | 0 | 0.00
102 | 政府行政主管 | 5 | 0.41
103 | 公營事業主管 | 9 | 0.74
104 | 民營事業主管 | 46 | 3.78
105 | 民營事業公司負責人(自營商人)，有雇用人 | 35 | 2.87
106 | 民營事業公司負責人(自營商人)，沒有雇用人 | 10 | 0.82
201 | 政府部門研究人員(科學家) | 1 | 0.08
202 | 私人部門研究人員(科學家) | 0 | 0.00
203 | 公立醫療單位醫事技術人員(醫師、藥師、護士、醫療人員) | 0 | 0.00
204 | 非公立醫療單位醫事技術人員(醫師、藥師、護士、醫療人員) | 6 | 0.49
205 | 會計師 | 2 | 0.16
206 | 公立教育機構教師 | 13 | 1.07
207 | 私立教育機構教師 | 6 | 0.49
208 | 法官、書記官、檢察官、司法官 | 0 | 0.00
209 | 律師 | 0 | 0.00
210 | 宗教工作者 | 1 | 0.08
211 | 藝術工作者(演員、表演工作者、攝影師) | 0 | 0.00
212 | 文字工作者(作家、記者、劇作家) | 0 | 0.00
213 | 公營事業工程師(機師) | 0 | 0.00
214 | 民營事業工程師(機師) | 4 | 0.33
215 | 職業運動專業人士 | 0 | 0.00
301 | 政府單位與公營事業部門職員 | 17 | 1.40
302 | 民營事業職員 | 35 | 2.87
303 | 買賣業務人員 | 1 | 0.08
401 | 服務、餐旅人員(含攤販、個人服務、計程車司機) | 13 | 1.07
501 | 農林漁牧 | 12 | 0.99
601 | 政府單位與公營事業部門勞工 | 8 | 0.66
602 | 民營事業勞工 | 78 | 6.40
701 | 學生 | 0 | 0.00
801 | 軍警調查局人員 | 5 | 0.41
907 | 無正式工作但有其他收入 | 0 | 0.00
995 | 拒答 | 9 | 0.74
999 | 跳題 | 902 | 74.06
<NA> | <NA> | 0 | 0.00
Value | Valid % | Cum. %
------------------------
101 | 0.00 | 0.00
102 | 0.41 | 0.41
103 | 0.74 | 1.15
104 | 3.78 | 4.93
105 | 2.87 | 7.80
106 | 0.82 | 8.62
201 | 0.08 | 8.70
202 | 0.00 | 8.70
203 | 0.00 | 8.70
204 | 0.49 | 9.20
205 | 0.16 | 9.36
206 | 1.07 | 10.43
207 | 0.49 | 10.92
208 | 0.00 | 10.92
209 | 0.00 | 10.92
210 | 0.08 | 11.00
211 | 0.00 | 11.00
212 | 0.00 | 11.00
213 | 0.00 | 11.00
214 | 0.33 | 11.33
215 | 0.00 | 11.33
301 | 1.40 | 12.73
302 | 2.87 | 15.60
303 | 0.08 | 15.68
401 | 1.07 | 16.75
501 | 0.99 | 17.73
601 | 0.66 | 18.39
602 | 6.40 | 24.79
701 | 0.00 | 24.79
801 | 0.41 | 25.21
907 | 0.00 | 25.21
995 | 0.74 | 25.94
999 | 74.06 | 100.00
<NA> | <NA> | <NA># ２９．請問您的戶籍地（臺：戶口）是______________縣市_____________ 鄉鎮市區（縣市含蓋第33-53題）
library(dplyr)
library(sjmisc)
library(sjPlot)
# 選取 Q33 ~ Q53
subset_data <- data %>% select(Q33:Q53)
view_df(subset_data)| ID | Name | Label | Values | Value Labels |
| 1 | Q33 | 請問您戶籍是在哪一個縣市？ | 2 4 5 7 8 9 10 13 14 15 16 17 18 20 28 <...> |
宜蘭縣 新竹縣 苗栗縣 彰化縣 南投縣 雲林縣 嘉義縣 屏東縣 臺東縣 花蓮縣 澎湖縣 基隆市 新竹市 嘉義市 金門縣 <... truncated> |
| 2 | Q34 | 請問在宜蘭縣哪一個鄉鎮市？ | 1 2 3 4 5 6 7 8 9 10 11 12 |
宜蘭市 羅東鎮 蘇澳鎮 頭城鎮 礁溪鄉 壯圍鄉 員山鄉 冬山鄉 五結鄉 三星鄉 大同鄉 南澳鄉 |
| 3 | Q35 | 請問在新竹縣哪一個鄉鎮市？ | 1 2 3 4 5 6 7 8 9 10 11 12 13 |
竹北市 竹東鎮 新埔鎮 關西鎮 湖口鄉 新豐鄉 芎林鄉 橫山鄉 北埔鄉 寶山鄉 峨眉鄉 尖石鄉 五峰鄉 |
| 4 | Q36 | 請問在苗栗縣哪一個鄉鎮市？ | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 <...> |
苗栗市 苑裡鎮 通霄鎮 竹南鎮 頭份市 後龍鎮 卓蘭鎮 大湖鄉 公館鄉 銅鑼鄉 南庄鄉 頭屋鄉 三義鄉 西湖鄉 造橋鄉 <... truncated> |
| 5 | Q37 | 請問在彰化縣哪一個鄉鎮市？ | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 <...> |
彰化市 鹿港鎮 和美鎮 線西鄉 伸港鄉 福興鄉 秀水鄉 花壇鄉 芬園鄉 員林市 溪湖鎮 田中鎮 大村鄉 埔鹽鄉 埔心鄉 <... truncated> |
| 6 | Q38 | 請問在南投縣哪一個鄉鎮市？ | 1 2 3 4 5 6 7 8 9 10 11 12 13 |
南投市 埔里鎮 草屯鎮 竹山鎮 集集鎮 名間鄉 鹿谷鄉 中寮鄉 魚池鄉 國姓鄉 水里鄉 信義鄉 仁愛鄉 |
| 7 | Q39 | 請問在雲林縣哪一個鄉鎮市？ | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 <...> |
斗六市 斗南鎮 虎尾鎮 西螺鎮 土庫鎮 北港鎮 古坑鄉 大埤鄉 莿桐鄉 林內鄉 二崙鄉 崙背鄉 麥寮鄉 東勢鄉 褒忠鄉 <... truncated> |
| 8 | Q40 | 請問在嘉義縣哪一個鄉鎮市？ | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 <...> |
太保市 朴子市 布袋鎮 大林鎮 民雄鄉 溪口鄉 新港鄉 六腳鄉 東石鄉 義竹鄉 鹿草鄉 水上鄉 中埔鄉 竹崎鄉 梅山鄉 <... truncated> |
| 9 | Q41 | 請問在屏東縣哪一個鄉鎮市？ | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 <...> |
屏東市 潮洲鎮 東港鎮 恆春鎮 萬丹鄉 長治鄉 麟洛鄉 九如鄉 里港鄉 鹽埔鄉 高樹鄉 萬巒鄉 內埔鄉 竹田鄉 新埤鄉 <... truncated> |
| 10 | Q42 | 請問在臺東縣哪一個鄉鎮市？ | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 <...> |
臺東市 成功鎮 關山鎮 卑南鄉 鹿野鄉 池上鄉 東河鄉 長濱鄉 太麻里鄉 大武鄉 綠島鄉 海端鄉 延平鄉 金峰鄉 達仁鄉 <... truncated> |
| 11 | Q43 | 請問在花蓮縣哪一個鄉鎮市？ | 1 2 3 4 5 6 7 8 9 10 11 12 13 |
花蓮市 鳳林鎮 玉里鎮 新城鄉 吉安鄉 壽豐鄉 光復鄉 豐濱鄉 瑞穗鄉 富里鄉 秀林鄉 萬榮鄉 卓溪鄉 |
| 12 | Q44 | 請問在澎湖縣哪一個鄉鎮市？ | 1 2 3 4 5 6 |
馬公市 湖西鄉 白沙鄉 西嶼鄉 望安鄉 七美鄉 |
| 13 | Q45 | 請問在基隆市哪一個區？ | 1 2 3 4 5 6 7 |
中正區 七堵區 暖暖區 仁愛區 中山區 安樂區 信義區 |
| 14 | Q46 | 請問在新竹市哪一個區？ | 1 2 3 |
東區 北區 香山區 |
| 15 | Q47 | 請問在嘉義市哪一個區？ | 1 2 |
東區 西區 |
| 16 | Q48 | 請問在臺北市哪一個區？ | 1 2 3 4 5 6 7 8 9 10 11 12 |
松山區 信義區 大安區 中山區 中正區 大同區 萬華區 文山區 南港區 內湖區 士林區 北投區 |
| 17 | Q49 | 請問在高雄市哪一個區？ | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 <...> |
鹽埕區 鼓山區 左營區 楠梓區 三民區 新興區 前金區 苓雅區 前鎮區 旗津區 小港區 鳳山區 林園區 大寮區 大樹區 <... truncated> |
| 18 | Q50 | 請問在新北市哪一個區？ | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 <...> |
板橋區 三重區 中和區 永和區 新莊區 新店區 樹林區 鶯歌區 三峽區 淡水區 汐止區 瑞芳區 土城區 蘆洲區 五股區 <... truncated> |
| 19 | Q51 | 請問在臺中市哪一個區？ | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 <...> |
中區 東區 南區 西區 北區 西屯區 南屯區 北屯區 豐原區 東勢區 大甲區 清水區 沙鹿區 梧棲區 后里區 <... truncated> |
| 20 | Q52 | 請問在臺南市哪一個區？ | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 <...> |
新營區 鹽水區 白河區 柳營區 後壁區 東山區 麻豆區 下營區 六甲區 官田區 大內區 佳里區 學甲區 西港區 七股區 <... truncated> |
| 21 | Q53 | 請問在桃園市哪一個區？ | 1 2 3 4 5 6 7 8 9 10 11 12 13 |
桃園區 中壢區 大溪區 楊梅區 蘆竹區 大園區 龜山區 八德區 龍潭區 平鎮區 新屋區 觀音區 復興區 |
frq(subset_data)請問您戶籍是在哪一個縣市？ (Q33) <numeric>
# total N=1218 valid N=1203 mean=46.39 sd=26.70
Value | Label | N | Raw % | Valid % | Cum. %
-----------------------------------------------
2 | 宜蘭縣 | 21 | 1.72 | 1.75 | 1.75
4 | 新竹縣 | 23 | 1.89 | 1.91 | 3.66
5 | 苗栗縣 | 34 | 2.79 | 2.83 | 6.48
7 | 彰化縣 | 110 | 9.03 | 9.14 | 15.63
8 | 南投縣 | 22 | 1.81 | 1.83 | 17.46
9 | 雲林縣 | 40 | 3.28 | 3.33 | 20.78
10 | 嘉義縣 | 37 | 3.04 | 3.08 | 23.86
13 | 屏東縣 | 41 | 3.37 | 3.41 | 27.27
14 | 臺東縣 | 13 | 1.07 | 1.08 | 28.35
15 | 花蓮縣 | 12 | 0.99 | 1.00 | 29.34
16 | 澎湖縣 | 3 | 0.25 | 0.25 | 29.59
17 | 基隆市 | 14 | 1.15 | 1.16 | 30.76
18 | 新竹市 | 20 | 1.64 | 1.66 | 32.42
20 | 嘉義市 | 19 | 1.56 | 1.58 | 34.00
28 | 金門縣 | 3 | 0.25 | 0.25 | 34.25
29 | 連江縣 | 0 | 0.00 | 0.00 | 34.25
63 | 臺北市 | 115 | 9.44 | 9.56 | 43.81
64 | 高雄市 | 110 | 9.03 | 9.14 | 52.95
65 | 新北市 | 184 | 15.11 | 15.30 | 68.25
66 | 臺中市 | 141 | 11.58 | 11.72 | 79.97
67 | 臺南市 | 116 | 9.52 | 9.64 | 89.61
68 | 桃園市 | 125 | 10.26 | 10.39 | 100.00
<NA> | <NA> | 15 | 1.23 | <NA> | <NA>
請問在宜蘭縣哪一個鄉鎮市？ (Q34) <numeric>
# total N=1218 valid N=21 mean=5.52 sd=3.03
Value | Label | N | Raw % | Valid % | Cum. %
------------------------------------------------
1 | 宜蘭市 | 2 | 0.16 | 9.52 | 9.52
2 | 羅東鎮 | 3 | 0.25 | 14.29 | 23.81
3 | 蘇澳鎮 | 3 | 0.25 | 14.29 | 38.10
4 | 頭城鎮 | 1 | 0.08 | 4.76 | 42.86
5 | 礁溪鄉 | 0 | 0.00 | 0.00 | 42.86
6 | 壯圍鄉 | 2 | 0.16 | 9.52 | 52.38
7 | 員山鄉 | 1 | 0.08 | 4.76 | 57.14
8 | 冬山鄉 | 6 | 0.49 | 28.57 | 85.71
9 | 五結鄉 | 2 | 0.16 | 9.52 | 95.24
10 | 三星鄉 | 1 | 0.08 | 4.76 | 100.00
11 | 大同鄉 | 0 | 0.00 | 0.00 | 100.00
12 | 南澳鄉 | 0 | 0.00 | 0.00 | 100.00
<NA> | <NA> | 1197 | 98.28 | <NA> | <NA>
請問在新竹縣哪一個鄉鎮市？ (Q35) <numeric>
# total N=1218 valid N=22 mean=3.86 sd=3.31
Value | Label | N | Raw % | Valid % | Cum. %
------------------------------------------------
1 | 竹北市 | 9 | 0.74 | 40.91 | 40.91
2 | 竹東鎮 | 2 | 0.16 | 9.09 | 50.00
3 | 新埔鎮 | 1 | 0.08 | 4.55 | 54.55
4 | 關西鎮 | 2 | 0.16 | 9.09 | 63.64
5 | 湖口鄉 | 0 | 0.00 | 0.00 | 63.64
6 | 新豐鄉 | 4 | 0.33 | 18.18 | 81.82
7 | 芎林鄉 | 1 | 0.08 | 4.55 | 86.36
8 | 橫山鄉 | 1 | 0.08 | 4.55 | 90.91
9 | 北埔鄉 | 0 | 0.00 | 0.00 | 90.91
10 | 寶山鄉 | 1 | 0.08 | 4.55 | 95.45
11 | 峨眉鄉 | 0 | 0.00 | 0.00 | 95.45
12 | 尖石鄉 | 1 | 0.08 | 4.55 | 100.00
13 | 五峰鄉 | 0 | 0.00 | 0.00 | 100.00
<NA> | <NA> | 1196 | 98.19 | <NA> | <NA>
請問在苗栗縣哪一個鄉鎮市？ (Q36) <numeric>
# total N=1218 valid N=33 mean=4.88 sd=3.13
Value | Label | N | Raw % | Valid % | Cum. %
------------------------------------------------
1 | 苗栗市 | 4 | 0.33 | 12.12 | 12.12
2 | 苑裡鎮 | 4 | 0.33 | 12.12 | 24.24
3 | 通霄鎮 | 3 | 0.25 | 9.09 | 33.33
4 | 竹南鎮 | 6 | 0.49 | 18.18 | 51.52
5 | 頭份市 | 8 | 0.66 | 24.24 | 75.76
6 | 後龍鎮 | 1 | 0.08 | 3.03 | 78.79
7 | 卓蘭鎮 | 0 | 0.00 | 0.00 | 78.79
8 | 大湖鄉 | 1 | 0.08 | 3.03 | 81.82
9 | 公館鄉 | 3 | 0.25 | 9.09 | 90.91
10 | 銅鑼鄉 | 1 | 0.08 | 3.03 | 93.94
11 | 南庄鄉 | 0 | 0.00 | 0.00 | 93.94
12 | 頭屋鄉 | 1 | 0.08 | 3.03 | 96.97
13 | 三義鄉 | 1 | 0.08 | 3.03 | 100.00
14 | 西湖鄉 | 0 | 0.00 | 0.00 | 100.00
15 | 造橋鄉 | 0 | 0.00 | 0.00 | 100.00
16 | 三灣鄉 | 0 | 0.00 | 0.00 | 100.00
17 | 獅潭鄉 | 0 | 0.00 | 0.00 | 100.00
18 | 泰安鄉 | 0 | 0.00 | 0.00 | 100.00
<NA> | <NA> | 1185 | 97.29 | <NA> | <NA>
請問在彰化縣哪一個鄉鎮市？ (Q37) <numeric>
# total N=1218 valid N=103 mean=10.74 sd=7.61
Value | Label | N | Raw % | Valid % | Cum. %
------------------------------------------------
1 | 彰化市 | 15 | 1.23 | 14.56 | 14.56
2 | 鹿港鎮 | 4 | 0.33 | 3.88 | 18.45
3 | 和美鎮 | 6 | 0.49 | 5.83 | 24.27
4 | 線西鄉 | 0 | 0.00 | 0.00 | 24.27
5 | 伸港鄉 | 9 | 0.74 | 8.74 | 33.01
6 | 福興鄉 | 1 | 0.08 | 0.97 | 33.98
7 | 秀水鄉 | 2 | 0.16 | 1.94 | 35.92
8 | 花壇鄉 | 5 | 0.41 | 4.85 | 40.78
9 | 芬園鄉 | 2 | 0.16 | 1.94 | 42.72
10 | 員林市 | 15 | 1.23 | 14.56 | 57.28
11 | 溪湖鎮 | 8 | 0.66 | 7.77 | 65.05
12 | 田中鎮 | 2 | 0.16 | 1.94 | 66.99
13 | 大村鄉 | 2 | 0.16 | 1.94 | 68.93
14 | 埔鹽鄉 | 0 | 0.00 | 0.00 | 68.93
15 | 埔心鄉 | 4 | 0.33 | 3.88 | 72.82
16 | 永靖鄉 | 1 | 0.08 | 0.97 | 73.79
17 | 社頭鄉 | 3 | 0.25 | 2.91 | 76.70
18 | 二水鄉 | 1 | 0.08 | 0.97 | 77.67
19 | 北斗鎮 | 3 | 0.25 | 2.91 | 80.58
20 | 二林鎮 | 7 | 0.57 | 6.80 | 87.38
21 | 田尾鄉 | 1 | 0.08 | 0.97 | 88.35
22 | 埤頭鄉 | 3 | 0.25 | 2.91 | 91.26
23 | 芳苑鄉 | 2 | 0.16 | 1.94 | 93.20
24 | 大城鄉 | 1 | 0.08 | 0.97 | 94.17
25 | 竹塘鄉 | 1 | 0.08 | 0.97 | 95.15
26 | 溪州鄉 | 5 | 0.41 | 4.85 | 100.00
<NA> | <NA> | 1115 | 91.54 | <NA> | <NA>
請問在南投縣哪一個鄉鎮市？ (Q38) <numeric>
# total N=1218 valid N=22 mean=5.77 sd=4.72
Value | Label | N | Raw % | Valid % | Cum. %
------------------------------------------------
1 | 南投市 | 4 | 0.33 | 18.18 | 18.18
2 | 埔里鎮 | 5 | 0.41 | 22.73 | 40.91
3 | 草屯鎮 | 4 | 0.33 | 18.18 | 59.09
4 | 竹山鎮 | 0 | 0.00 | 0.00 | 59.09
5 | 集集鎮 | 0 | 0.00 | 0.00 | 59.09
6 | 名間鄉 | 0 | 0.00 | 0.00 | 59.09
7 | 鹿谷鄉 | 0 | 0.00 | 0.00 | 59.09
8 | 中寮鄉 | 0 | 0.00 | 0.00 | 59.09
9 | 魚池鄉 | 0 | 0.00 | 0.00 | 59.09
10 | 國姓鄉 | 3 | 0.25 | 13.64 | 72.73
11 | 水里鄉 | 1 | 0.08 | 4.55 | 77.27
12 | 信義鄉 | 5 | 0.41 | 22.73 | 100.00
13 | 仁愛鄉 | 0 | 0.00 | 0.00 | 100.00
<NA> | <NA> | 1196 | 98.19 | <NA> | <NA>
請問在雲林縣哪一個鄉鎮市？ (Q39) <numeric>
# total N=1218 valid N=38 mean=8.29 sd=6.08
Value | Label | N | Raw % | Valid % | Cum. %
------------------------------------------------
1 | 斗六市 | 8 | 0.66 | 21.05 | 21.05
2 | 斗南鎮 | 2 | 0.16 | 5.26 | 26.32
3 | 虎尾鎮 | 2 | 0.16 | 5.26 | 31.58
4 | 西螺鎮 | 3 | 0.25 | 7.89 | 39.47
5 | 土庫鎮 | 0 | 0.00 | 0.00 | 39.47
6 | 北港鎮 | 1 | 0.08 | 2.63 | 42.11
7 | 古坑鄉 | 4 | 0.33 | 10.53 | 52.63
8 | 大埤鄉 | 1 | 0.08 | 2.63 | 55.26
9 | 莿桐鄉 | 0 | 0.00 | 0.00 | 55.26
10 | 林內鄉 | 1 | 0.08 | 2.63 | 57.89
11 | 二崙鄉 | 1 | 0.08 | 2.63 | 60.53
12 | 崙背鄉 | 3 | 0.25 | 7.89 | 68.42
13 | 麥寮鄉 | 4 | 0.33 | 10.53 | 78.95
14 | 東勢鄉 | 1 | 0.08 | 2.63 | 81.58
15 | 褒忠鄉 | 2 | 0.16 | 5.26 | 86.84
16 | 臺西鄉 | 0 | 0.00 | 0.00 | 86.84
17 | 元長鄉 | 2 | 0.16 | 5.26 | 92.11
18 | 四湖鄉 | 2 | 0.16 | 5.26 | 97.37
19 | 口湖鄉 | 0 | 0.00 | 0.00 | 97.37
20 | 水林鄉 | 1 | 0.08 | 2.63 | 100.00
<NA> | <NA> | 1180 | 96.88 | <NA> | <NA>
請問在嘉義縣哪一個鄉鎮市？ (Q40) <numeric>
# total N=1218 valid N=35 mean=7.86 sd=4.51
Value | Label | N | Raw % | Valid % | Cum. %
--------------------------------------------------
1 | 太保市 | 2 | 0.16 | 5.71 | 5.71
2 | 朴子市 | 1 | 0.08 | 2.86 | 8.57
3 | 布袋鎮 | 4 | 0.33 | 11.43 | 20.00
4 | 大林鎮 | 2 | 0.16 | 5.71 | 25.71
5 | 民雄鄉 | 6 | 0.49 | 17.14 | 42.86
6 | 溪口鄉 | 1 | 0.08 | 2.86 | 45.71
7 | 新港鄉 | 3 | 0.25 | 8.57 | 54.29
8 | 六腳鄉 | 2 | 0.16 | 5.71 | 60.00
9 | 東石鄉 | 1 | 0.08 | 2.86 | 62.86
10 | 義竹鄉 | 2 | 0.16 | 5.71 | 68.57
11 | 鹿草鄉 | 0 | 0.00 | 0.00 | 68.57
12 | 水上鄉 | 3 | 0.25 | 8.57 | 77.14
13 | 中埔鄉 | 3 | 0.25 | 8.57 | 85.71
14 | 竹崎鄉 | 2 | 0.16 | 5.71 | 91.43
15 | 梅山鄉 | 2 | 0.16 | 5.71 | 97.14
16 | 番路鄉 | 1 | 0.08 | 2.86 | 100.00
17 | 大埔鄉 | 0 | 0.00 | 0.00 | 100.00
18 | 阿里山鄉 | 0 | 0.00 | 0.00 | 100.00
<NA> | <NA> | 1183 | 97.13 | <NA> | <NA>
請問在屏東縣哪一個鄉鎮市？ (Q41) <numeric>
# total N=1218 valid N=38 mean=9.84 sd=8.34
Value | Label | N | Raw % | Valid % | Cum. %
--------------------------------------------------
1 | 屏東市 | 8 | 0.66 | 21.05 | 21.05
2 | 潮洲鎮 | 3 | 0.25 | 7.89 | 28.95
3 | 東港鎮 | 1 | 0.08 | 2.63 | 31.58
4 | 恆春鎮 | 0 | 0.00 | 0.00 | 31.58
5 | 萬丹鄉 | 3 | 0.25 | 7.89 | 39.47
6 | 長治鄉 | 0 | 0.00 | 0.00 | 39.47
7 | 麟洛鄉 | 3 | 0.25 | 7.89 | 47.37
8 | 九如鄉 | 2 | 0.16 | 5.26 | 52.63
9 | 里港鄉 | 3 | 0.25 | 7.89 | 60.53
10 | 鹽埔鄉 | 2 | 0.16 | 5.26 | 65.79
11 | 高樹鄉 | 0 | 0.00 | 0.00 | 65.79
12 | 萬巒鄉 | 0 | 0.00 | 0.00 | 65.79
13 | 內埔鄉 | 1 | 0.08 | 2.63 | 68.42
14 | 竹田鄉 | 0 | 0.00 | 0.00 | 68.42
15 | 新埤鄉 | 0 | 0.00 | 0.00 | 68.42
16 | 枋寮鄉 | 1 | 0.08 | 2.63 | 71.05
17 | 新園鄉 | 3 | 0.25 | 7.89 | 78.95
18 | 崁頂鄉 | 0 | 0.00 | 0.00 | 78.95
19 | 林邊鄉 | 5 | 0.41 | 13.16 | 92.11
20 | 南州鄉 | 0 | 0.00 | 0.00 | 92.11
21 | 佳冬鄉 | 0 | 0.00 | 0.00 | 92.11
22 | 琉球鄉 | 0 | 0.00 | 0.00 | 92.11
23 | 車城鄉 | 1 | 0.08 | 2.63 | 94.74
24 | 滿州鄉 | 0 | 0.00 | 0.00 | 94.74
25 | 枋山鄉 | 0 | 0.00 | 0.00 | 94.74
26 | 三地門鄉 | 0 | 0.00 | 0.00 | 94.74
27 | 霧臺鄉 | 0 | 0.00 | 0.00 | 94.74
28 | 瑪家鄉 | 1 | 0.08 | 2.63 | 97.37
29 | 泰武鄉 | 0 | 0.00 | 0.00 | 97.37
30 | 來義鄉 | 0 | 0.00 | 0.00 | 97.37
31 | 春日鄉 | 0 | 0.00 | 0.00 | 97.37
32 | 獅子鄉 | 1 | 0.08 | 2.63 | 100.00
33 | 牡丹鄉 | 0 | 0.00 | 0.00 | 100.00
<NA> | <NA> | 1180 | 96.88 | <NA> | <NA>
請問在臺東縣哪一個鄉鎮市？ (Q42) <numeric>
# total N=1218 valid N=13 mean=2.69 sd=3.43
Value | Label | N | Raw % | Valid % | Cum. %
--------------------------------------------------
1 | 臺東市 | 9 | 0.74 | 69.23 | 69.23
2 | 成功鎮 | 0 | 0.00 | 0.00 | 69.23
3 | 關山鎮 | 0 | 0.00 | 0.00 | 69.23
4 | 卑南鄉 | 2 | 0.16 | 15.38 | 84.62
5 | 鹿野鄉 | 1 | 0.08 | 7.69 | 92.31
6 | 池上鄉 | 0 | 0.00 | 0.00 | 92.31
7 | 東河鄉 | 0 | 0.00 | 0.00 | 92.31
8 | 長濱鄉 | 0 | 0.00 | 0.00 | 92.31
9 | 太麻里鄉 | 0 | 0.00 | 0.00 | 92.31
10 | 大武鄉 | 0 | 0.00 | 0.00 | 92.31
11 | 綠島鄉 | 0 | 0.00 | 0.00 | 92.31
12 | 海端鄉 | 0 | 0.00 | 0.00 | 92.31
13 | 延平鄉 | 1 | 0.08 | 7.69 | 100.00
14 | 金峰鄉 | 0 | 0.00 | 0.00 | 100.00
15 | 達仁鄉 | 0 | 0.00 | 0.00 | 100.00
16 | 蘭嶼鄉 | 0 | 0.00 | 0.00 | 100.00
<NA> | <NA> | 1205 | 98.93 | <NA> | <NA>
請問在花蓮縣哪一個鄉鎮市？ (Q43) <numeric>
# total N=1218 valid N=11 mean=2.27 sd=2.20
Value | Label | N | Raw % | Valid % | Cum. %
------------------------------------------------
1 | 花蓮市 | 8 | 0.66 | 72.73 | 72.73
2 | 鳳林鎮 | 0 | 0.00 | 0.00 | 72.73
3 | 玉里鎮 | 0 | 0.00 | 0.00 | 72.73
4 | 新城鄉 | 0 | 0.00 | 0.00 | 72.73
5 | 吉安鄉 | 1 | 0.08 | 9.09 | 81.82
6 | 壽豐鄉 | 2 | 0.16 | 18.18 | 100.00
7 | 光復鄉 | 0 | 0.00 | 0.00 | 100.00
8 | 豐濱鄉 | 0 | 0.00 | 0.00 | 100.00
9 | 瑞穗鄉 | 0 | 0.00 | 0.00 | 100.00
10 | 富里鄉 | 0 | 0.00 | 0.00 | 100.00
11 | 秀林鄉 | 0 | 0.00 | 0.00 | 100.00
12 | 萬榮鄉 | 0 | 0.00 | 0.00 | 100.00
13 | 卓溪鄉 | 0 | 0.00 | 0.00 | 100.00
<NA> | <NA> | 1207 | 99.10 | <NA> | <NA>
請問在澎湖縣哪一個鄉鎮市？ (Q44) <numeric>
# total N=1218 valid N=3 mean=1.67 sd=1.15
Value | Label | N | Raw % | Valid % | Cum. %
------------------------------------------------
1 | 馬公市 | 2 | 0.16 | 66.67 | 66.67
2 | 湖西鄉 | 0 | 0.00 | 0.00 | 66.67
3 | 白沙鄉 | 1 | 0.08 | 33.33 | 100.00
4 | 西嶼鄉 | 0 | 0.00 | 0.00 | 100.00
5 | 望安鄉 | 0 | 0.00 | 0.00 | 100.00
6 | 七美鄉 | 0 | 0.00 | 0.00 | 100.00
<NA> | <NA> | 1215 | 99.75 | <NA> | <NA>
請問在基隆市哪一個區？ (Q45) <numeric>
# total N=1218 valid N=12 mean=4.83 sd=1.75
Value | Label | N | Raw % | Valid % | Cum. %
------------------------------------------------
1 | 中正區 | 0 | 0.00 | 0.00 | 0.00
2 | 七堵區 | 2 | 0.16 | 16.67 | 16.67
3 | 暖暖區 | 1 | 0.08 | 8.33 | 25.00
4 | 仁愛區 | 1 | 0.08 | 8.33 | 33.33
5 | 中山區 | 3 | 0.25 | 25.00 | 58.33
6 | 安樂區 | 3 | 0.25 | 25.00 | 83.33
7 | 信義區 | 2 | 0.16 | 16.67 | 100.00
<NA> | <NA> | 1206 | 99.01 | <NA> | <NA>
請問在新竹市哪一個區？ (Q46) <numeric>
# total N=1218 valid N=20 mean=1.80 sd=0.77
Value | Label | N | Raw % | Valid % | Cum. %
------------------------------------------------
1 | 東區 | 8 | 0.66 | 40 | 40
2 | 北區 | 8 | 0.66 | 40 | 80
3 | 香山區 | 4 | 0.33 | 20 | 100
<NA> | <NA> | 1198 | 98.36 | <NA> | <NA>
請問在嘉義市哪一個區？ (Q47) <numeric>
# total N=1218 valid N=16 mean=1.50 sd=0.52
Value | Label | N | Raw % | Valid % | Cum. %
-----------------------------------------------
1 | 東區 | 8 | 0.66 | 50 | 50
2 | 西區 | 8 | 0.66 | 50 | 100
<NA> | <NA> | 1202 | 98.69 | <NA> | <NA>
請問在臺北市哪一個區？ (Q48) <numeric>
# total N=1218 valid N=109 mean=6.90 sd=3.52
Value | Label | N | Raw % | Valid % | Cum. %
------------------------------------------------
1 | 松山區 | 1 | 0.08 | 0.92 | 0.92
2 | 信義區 | 9 | 0.74 | 8.26 | 9.17
3 | 大安區 | 18 | 1.48 | 16.51 | 25.69
4 | 中山區 | 12 | 0.99 | 11.01 | 36.70
5 | 中正區 | 7 | 0.57 | 6.42 | 43.12
6 | 大同區 | 5 | 0.41 | 4.59 | 47.71
7 | 萬華區 | 4 | 0.33 | 3.67 | 51.38
8 | 文山區 | 14 | 1.15 | 12.84 | 64.22
9 | 南港區 | 3 | 0.25 | 2.75 | 66.97
10 | 內湖區 | 9 | 0.74 | 8.26 | 75.23
11 | 士林區 | 15 | 1.23 | 13.76 | 88.99
12 | 北投區 | 12 | 0.99 | 11.01 | 100.00
<NA> | <NA> | 1109 | 91.05 | <NA> | <NA>
請問在高雄市哪一個區？ (Q49) <numeric>
# total N=1218 valid N=106 mean=12.58 sd=8.80
Value | Label | N | Raw % | Valid % | Cum. %
--------------------------------------------------
1 | 鹽埕區 | 2 | 0.16 | 1.89 | 1.89
2 | 鼓山區 | 3 | 0.25 | 2.83 | 4.72
3 | 左營區 | 7 | 0.57 | 6.60 | 11.32
4 | 楠梓區 | 6 | 0.49 | 5.66 | 16.98
5 | 三民區 | 15 | 1.23 | 14.15 | 31.13
6 | 新興區 | 3 | 0.25 | 2.83 | 33.96
7 | 前金區 | 1 | 0.08 | 0.94 | 34.91
8 | 苓雅區 | 6 | 0.49 | 5.66 | 40.57
9 | 前鎮區 | 6 | 0.49 | 5.66 | 46.23
10 | 旗津區 | 1 | 0.08 | 0.94 | 47.17
11 | 小港區 | 3 | 0.25 | 2.83 | 50.00
12 | 鳳山區 | 10 | 0.82 | 9.43 | 59.43
13 | 林園區 | 2 | 0.16 | 1.89 | 61.32
14 | 大寮區 | 6 | 0.49 | 5.66 | 66.98
15 | 大樹區 | 4 | 0.33 | 3.77 | 70.75
16 | 大社區 | 0 | 0.00 | 0.00 | 70.75
17 | 仁武區 | 5 | 0.41 | 4.72 | 75.47
18 | 鳥松區 | 1 | 0.08 | 0.94 | 76.42
19 | 岡山區 | 5 | 0.41 | 4.72 | 81.13
20 | 橋頭區 | 1 | 0.08 | 0.94 | 82.08
21 | 燕巢區 | 1 | 0.08 | 0.94 | 83.02
22 | 田寮區 | 1 | 0.08 | 0.94 | 83.96
23 | 阿蓮區 | 1 | 0.08 | 0.94 | 84.91
24 | 路竹區 | 3 | 0.25 | 2.83 | 87.74
25 | 湖內區 | 1 | 0.08 | 0.94 | 88.68
26 | 茄萣區 | 2 | 0.16 | 1.89 | 90.57
27 | 永安區 | 1 | 0.08 | 0.94 | 91.51
28 | 彌陀區 | 0 | 0.00 | 0.00 | 91.51
29 | 梓官區 | 2 | 0.16 | 1.89 | 93.40
30 | 旗山區 | 2 | 0.16 | 1.89 | 95.28
31 | 美濃區 | 2 | 0.16 | 1.89 | 97.17
32 | 六龜區 | 1 | 0.08 | 0.94 | 98.11
33 | 甲仙區 | 0 | 0.00 | 0.00 | 98.11
34 | 杉林區 | 0 | 0.00 | 0.00 | 98.11
35 | 內門區 | 0 | 0.00 | 0.00 | 98.11
36 | 茂林區 | 0 | 0.00 | 0.00 | 98.11
37 | 桃源區 | 2 | 0.16 | 1.89 | 100.00
38 | 那瑪夏區 | 0 | 0.00 | 0.00 | 100.00
<NA> | <NA> | 1112 | 91.30 | <NA> | <NA>
請問在新北市哪一個區？ (Q50) <numeric>
# total N=1218 valid N=180 mean=7.49 sd=6.15
Value | Label | N | Raw % | Valid % | Cum. %
------------------------------------------------
1 | 板橋區 | 23 | 1.89 | 12.78 | 12.78
2 | 三重區 | 24 | 1.97 | 13.33 | 26.11
3 | 中和區 | 15 | 1.23 | 8.33 | 34.44
4 | 永和區 | 7 | 0.57 | 3.89 | 38.33
5 | 新莊區 | 20 | 1.64 | 11.11 | 49.44
6 | 新店區 | 11 | 0.90 | 6.11 | 55.56
7 | 樹林區 | 8 | 0.66 | 4.44 | 60.00
8 | 鶯歌區 | 3 | 0.25 | 1.67 | 61.67
9 | 三峽區 | 5 | 0.41 | 2.78 | 64.44
10 | 淡水區 | 13 | 1.07 | 7.22 | 71.67
11 | 汐止區 | 14 | 1.15 | 7.78 | 79.44
12 | 瑞芳區 | 4 | 0.33 | 2.22 | 81.67
13 | 土城區 | 5 | 0.41 | 2.78 | 84.44
14 | 蘆洲區 | 8 | 0.66 | 4.44 | 88.89
15 | 五股區 | 3 | 0.25 | 1.67 | 90.56
16 | 泰山區 | 2 | 0.16 | 1.11 | 91.67
17 | 林口區 | 6 | 0.49 | 3.33 | 95.00
18 | 深坑區 | 0 | 0.00 | 0.00 | 95.00
19 | 石碇區 | 0 | 0.00 | 0.00 | 95.00
20 | 坪林區 | 0 | 0.00 | 0.00 | 95.00
21 | 三芝區 | 1 | 0.08 | 0.56 | 95.56
22 | 石門區 | 0 | 0.00 | 0.00 | 95.56
23 | 八里區 | 2 | 0.16 | 1.11 | 96.67
24 | 平溪區 | 0 | 0.00 | 0.00 | 96.67
25 | 雙溪區 | 1 | 0.08 | 0.56 | 97.22
26 | 貢寮區 | 2 | 0.16 | 1.11 | 98.33
27 | 金山區 | 2 | 0.16 | 1.11 | 99.44
28 | 萬里區 | 1 | 0.08 | 0.56 | 100.00
29 | 烏來區 | 0 | 0.00 | 0.00 | 100.00
<NA> | <NA> | 1038 | 85.22 | <NA> | <NA>
請問在臺中市哪一個區？ (Q51) <numeric>
# total N=1218 valid N=137 mean=13.93 sd=8.24
Value | Label | N | Raw % | Valid % | Cum. %
------------------------------------------------
1 | 中區 | 0 | 0.00 | 0.00 | 0.00
2 | 東區 | 2 | 0.16 | 1.46 | 1.46
3 | 南區 | 6 | 0.49 | 4.38 | 5.84
4 | 西區 | 3 | 0.25 | 2.19 | 8.03
5 | 北區 | 6 | 0.49 | 4.38 | 12.41
6 | 西屯區 | 9 | 0.74 | 6.57 | 18.98
7 | 南屯區 | 11 | 0.90 | 8.03 | 27.01
8 | 北屯區 | 16 | 1.31 | 11.68 | 38.69
9 | 豐原區 | 7 | 0.57 | 5.11 | 43.80
10 | 東勢區 | 2 | 0.16 | 1.46 | 45.26
11 | 大甲區 | 2 | 0.16 | 1.46 | 46.72
12 | 清水區 | 7 | 0.57 | 5.11 | 51.82
13 | 沙鹿區 | 9 | 0.74 | 6.57 | 58.39
14 | 梧棲區 | 4 | 0.33 | 2.92 | 61.31
15 | 后里區 | 2 | 0.16 | 1.46 | 62.77
16 | 神岡區 | 4 | 0.33 | 2.92 | 65.69
17 | 潭子區 | 2 | 0.16 | 1.46 | 67.15
18 | 大雅區 | 8 | 0.66 | 5.84 | 72.99
19 | 新社區 | 1 | 0.08 | 0.73 | 73.72
20 | 石岡區 | 1 | 0.08 | 0.73 | 74.45
21 | 外埔區 | 1 | 0.08 | 0.73 | 75.18
22 | 大安區 | 1 | 0.08 | 0.73 | 75.91
23 | 烏日區 | 4 | 0.33 | 2.92 | 78.83
24 | 大肚區 | 4 | 0.33 | 2.92 | 81.75
25 | 龍井區 | 2 | 0.16 | 1.46 | 83.21
26 | 霧峰區 | 0 | 0.00 | 0.00 | 83.21
27 | 太平區 | 12 | 0.99 | 8.76 | 91.97
28 | 大里區 | 11 | 0.90 | 8.03 | 100.00
29 | 和平區 | 0 | 0.00 | 0.00 | 100.00
<NA> | <NA> | 1081 | 88.75 | <NA> | <NA>
請問在臺南市哪一個區？ (Q52) <numeric>
# total N=1218 valid N=112 mean=24.20 sd=11.36
Value | Label | N | Raw % | Valid % | Cum. %
------------------------------------------------
1 | 新營區 | 2 | 0.16 | 1.79 | 1.79
2 | 鹽水區 | 2 | 0.16 | 1.79 | 3.57
3 | 白河區 | 2 | 0.16 | 1.79 | 5.36
4 | 柳營區 | 1 | 0.08 | 0.89 | 6.25
5 | 後壁區 | 1 | 0.08 | 0.89 | 7.14
6 | 東山區 | 3 | 0.25 | 2.68 | 9.82
7 | 麻豆區 | 5 | 0.41 | 4.46 | 14.29
8 | 下營區 | 3 | 0.25 | 2.68 | 16.96
9 | 六甲區 | 0 | 0.00 | 0.00 | 16.96
10 | 官田區 | 1 | 0.08 | 0.89 | 17.86
11 | 大內區 | 0 | 0.00 | 0.00 | 17.86
12 | 佳里區 | 6 | 0.49 | 5.36 | 23.21
13 | 學甲區 | 4 | 0.33 | 3.57 | 26.79
14 | 西港區 | 2 | 0.16 | 1.79 | 28.57
15 | 七股區 | 1 | 0.08 | 0.89 | 29.46
16 | 將軍區 | 1 | 0.08 | 0.89 | 30.36
17 | 北門區 | 1 | 0.08 | 0.89 | 31.25
18 | 新化區 | 2 | 0.16 | 1.79 | 33.04
19 | 善化區 | 3 | 0.25 | 2.68 | 35.71
20 | 新市區 | 0 | 0.00 | 0.00 | 35.71
21 | 安定區 | 1 | 0.08 | 0.89 | 36.61
22 | 山上區 | 0 | 0.00 | 0.00 | 36.61
23 | 玉井區 | 0 | 0.00 | 0.00 | 36.61
24 | 楠西區 | 0 | 0.00 | 0.00 | 36.61
25 | 南化區 | 1 | 0.08 | 0.89 | 37.50
26 | 左鎮區 | 0 | 0.00 | 0.00 | 37.50
27 | 仁德區 | 6 | 0.49 | 5.36 | 42.86
28 | 歸仁區 | 3 | 0.25 | 2.68 | 45.54
29 | 關廟區 | 6 | 0.49 | 5.36 | 50.89
30 | 龍崎區 | 0 | 0.00 | 0.00 | 50.89
31 | 永康區 | 7 | 0.57 | 6.25 | 57.14
32 | 東區 | 11 | 0.90 | 9.82 | 66.96
33 | 南區 | 12 | 0.99 | 10.71 | 77.68
34 | 北區 | 9 | 0.74 | 8.04 | 85.71
35 | 安南區 | 7 | 0.57 | 6.25 | 91.96
36 | 安平區 | 6 | 0.49 | 5.36 | 97.32
37 | 中西區 | 3 | 0.25 | 2.68 | 100.00
<NA> | <NA> | 1106 | 90.80 | <NA> | <NA>
請問在桃園市哪一個區？ (Q53) <numeric>
# total N=1218 valid N=122 mean=4.75 sd=3.46
Value | Label | N | Raw % | Valid % | Cum. %
------------------------------------------------
1 | 桃園區 | 27 | 2.22 | 22.13 | 22.13
2 | 中壢區 | 22 | 1.81 | 18.03 | 40.16
3 | 大溪區 | 9 | 0.74 | 7.38 | 47.54
4 | 楊梅區 | 8 | 0.66 | 6.56 | 54.10
5 | 蘆竹區 | 11 | 0.90 | 9.02 | 63.11
6 | 大園區 | 3 | 0.25 | 2.46 | 65.57
7 | 龜山區 | 11 | 0.90 | 9.02 | 74.59
8 | 八德區 | 9 | 0.74 | 7.38 | 81.97
9 | 龍潭區 | 4 | 0.33 | 3.28 | 85.25
10 | 平鎮區 | 10 | 0.82 | 8.20 | 93.44
11 | 新屋區 | 5 | 0.41 | 4.10 | 97.54
12 | 觀音區 | 2 | 0.16 | 1.64 | 99.18
13 | 復興區 | 1 | 0.08 | 0.82 | 100.00
<NA> | <NA> | 1096 | 89.98 | <NA> | <NA># 30 . 性別：
# (01)男 (02)女
# 其為數據第54題
library(sjmisc)
library(sjPlot)
table(data$Q54)
1 2
653 565 data$sex <- rec(data$Q54, rec="1=1[男]; 2=0[女]", as.num = F)
frq(data$Q54)性別： (x) <numeric>
# total N=1218 valid N=1218 mean=1.46 sd=0.50
Value | Label | N | Raw % | Valid % | Cum. %
----------------------------------------------
1 | 男性 | 653 | 53.61 | 53.61 | 53.61
2 | 女性 | 565 | 46.39 | 46.39 | 100.00
<NA> | <NA> | 0 | 0.00 | <NA> | <NA>frq(data$Q54,out="view")| val | label | frq | raw.prc | valid.prc | cum.prc | |
| 1 | 男性 | 653 | 53.61 | 53.61 | 53.61 | |
| 2 | 女性 | 565 | 46.39 | 46.39 | 100.00 | |
| NA | NA | 0 | 0.00 | NA | NA | |
| total N=1218 · valid N=1218 · x̄=1.46 · σ=0.50 | ||||||
frq(data$Q54, weights = data$wr, out="v") Warning: Unknown or uninitialised column: `wr`.Weights `data$wr` not found in data.| val | label | frq | raw.prc | valid.prc | cum.prc | |
| 1 | 男性 | 653 | 53.61 | 53.61 | 53.61 | |
| 2 | 女性 | 565 | 46.39 | 46.39 | 100.00 | |
| NA | NA | 0 | 0.00 | NA | NA | |
| total N=1218 · valid N=1218 · x̄=1.46 · σ=0.50 | ||||||
plot_frq(data$Q54)
參考文獻
國際化（internationalization）指的是國家之間透過外交、制度、軍事與科技合作所形成的互動網絡，其核心仍以「國家」為主要行為單位；相對地，全球化（globalization）則強調跨國企業、資訊、資金與人流超越國界的流動，是一種「去國家化」的現象。長期以來，國際體系中的互動往往在這兩種模式之間擺盪，取決於各國決策者對市場局勢與產業結構的回應。
近年來，美國的政治走向逐漸傾向以經濟民族主義（economic nationalism）為核心。自川普第一任總統任期以來，便可觀察到美國採取一系列「內向化」的政策取向，包括退出或弱化國際組織的參與、促進企業與製造業的本土回流（reshoring）、並加強對本土產業與勞動市場的保護與投資。此一策略雖以「重建國內競爭力」為名，卻也在全球供應鏈中產生連鎖效應——特別是對過去依賴美國市場的中下游代工產業與出口導向型經濟體而言，形成了實質壓力與結構性不安，進一步引發區域經濟的波動與民心的焦慮。
這一連串保護市場的政策裡，關稅也是重要的運用手段，但相關研究指出，關稅的調整往往對自由市場造成雙向影響。像是Osang 與 Pereira（1996）論證，大多數情況下國家間提高關稅比例會使經濟成長在短期內明顯下降；而王騰坤與黃子庭（2006）則指出，徵收關稅會導致進口數量減少，進而使外匯需求下降，最終造成本國貨幣比價上升，影響出口競爭力。由此可知，關稅調整若僅追求單一效果（如保護本土產業），長期而言可能反而損及實際經濟利益，破壞原有的進出口平衡，並對整體國際經濟互動產生連鎖衝擊。
承接前述關於美國經濟民族主義與關稅調整對全球供應鏈的結構性影響，台灣作為高外貿依存的經濟體，其產業鏈與美國市場的緊密連結，使其在「去全球化」（de-globalization）與「再國家化」（re-nationalization）的趨勢下，成為最早受波及的區域之一。特別是在美國推動「川普關稅2.0」或相關政策升級的情境中，台灣多項出口導向產業將面臨直接壓力與結構性重整的挑戰。
具體而言，受影響的產業主要有五項：
（１）鋼鐵與鋼製品：台灣鋼材出口以成品鋼、扁材與長材為主，若美方課徵高額關稅，短期內難以吸收或轉嫁成本，直接削弱價格競爭力，並將推升下游產業如機械製造、汽車組裝與營建工程的生產成本。
（２）機械與設備：精密機械、泵浦與壓縮機等高技術含量產品，是台灣中小企業的重要出口項目。由於其價格彈性低，客戶對單價變動敏感，若加徵超過10%的關稅，勢必重創出口訂單與國際市占率。
（３）電機與ICT設備：儘管部分核心晶片可列入關稅豁免，但伺服器、感測器與電源模組等零組件仍受波及。稅率提升將推高整體採購與組裝成本，削弱台灣在全球電子供應鏈的核心地位。
（４）車輛及零件：台灣雖非傳統汽車出口國，但在電動自行車與車用零組件方面具全球競爭優勢。若美方取消優惠稅率，將使台灣企業在與歐洲、日本及越南競爭時處於不利位置。
（５）橡膠製品：包括輪胎、密封件與軟管等關鍵零件，若同時面臨加徵關稅與反傾銷調查，台灣廠商將承受雙重壓力，且須與東南亞低成本業者競爭市場份額。
在此背景下，劉憶如、楊永明、張五岳與劉大年（2025）提出五項戰略方向，作為台灣回應全球經濟重組的中長期路徑：
（１）出口市場多元化：降低對單一市場（如中國或美國）的依賴，強化東南亞、印度及中東市場開發。
（２）供應鏈重組與本地化：建立區域性供應鏈體系，降低對高風險品項的外部依存度。
（３）產業升級與科技自主：強化高階製造與晶片設計能力，培養自有品牌，提升附加價值。
（４）制度韌性與政策整合：結合財政、外貿、勞動與產業政策，建立整合性的抗壓體系。
（５）靈活外交與談判戰略：積極參與區域經貿協定（如CPTPP、IPEF），強化談判主動權與制度性安全。