影響臺灣民眾公共政策討論參與意願的可能因素

民意與政治行為研究計分作業2

Author

M156020016 林子翔

一、研究問題

在民主國家之中，人民透過選舉選出代議士，並由其代表人民進行公共政策的制定，然而代議士有時會受限於政黨立場、政治利益等因素影響，而無法充分的反影不同民眾的意見與需求，因此，令公民實際參與討論不僅能夠充分敘述其真實想法與需求，也能夠使政策制定上有民意的基礎做為參考，更能提升政策制定過程的民主正當性，同時也能令民眾更能實際去了解政策的優缺點，而非受到片面資訊影響去作出決定，因此我認為公民參與討論對於民主制度中民意的傳達具有重大意義。

但在現實中，即使政府提供民眾直接參與公共政策討論的機會，卻也不見得人人都有意願參與，這不免令我好奇，在民主制度中，公民能夠在選舉之外，透過參與政策討論來表達意見，甚至使其主張有機會成為政府施政的參考，應當是民主制度最重要的價值之一，但為何仍有民眾把握這樣的機會去討論、參與，有些民眾卻缺乏了參與意願?這樣的差異使我希望能夠去更進一步探討，為何台灣民眾對公共政策的討論存在這樣的差異，以及造成這些差異可能與哪些因素有關。

二、研究假設/論點

我個人選擇使用的資料庫是源自於閱覽SRDA時所觀察到的臺灣社會變遷基本調查計畫2023第八期第四次：國家認同與公民權組的問卷調查，問卷體為g4a，當受訪者被詢問是否願意參加政府在制定重大政策前舉辦的民眾討論會議時，回答「一定會參加」者占9.1%，「可能會參加」者占54.8%，「可能不會參加」者占22.0%，「一定不會參加」者占13.8%。可以明顯看到台灣民眾的公共政策討論參與意願上確實存在不同意願，在變異項上分布並無問題。

A1:教育程度可能會影響公民討論參與意願?

個人論點是，公民討論參與中，許多議題是具有涉及專業領域面向的知識(環保、法規等)，而教育程度較高者，在知識量與認知程度可能較高，因此在參與公共議題討論的成本較低，因此會有較高的公民討論參與意願。

問卷體:B1.您的教育程度是?

A2:政治效能感的高低可能會影響公民討論參與意願?

根據定義，政治效能感分為內在與外在，而其定義分別為:公民對自身政治能力的自信。認為自己有足夠的知識、理解力去參與政治。以及公民對政治體系與政府回應性的評估。認為政府官員是否在乎人民的聲音。我個人假設若內在效能感低落，便會直接喪失參與的動能，若外在效能感低落，則可能導致對政府失去信任，因而降低公民參與討論的意願(認為參與或不參與政府都無法回應自身期待)。

問卷體:C15a.您同不同意下列這些說法?像您這樣的人，對政府的作為沒有任何影響力/C15b.您同不同意下列這些說法?您認為政府不在乎像您這樣的人的想法是什麼

A3:資訊接收頻率可能會影響公民討論參與意願?

我的假設是一個人若接收到來自電視、報紙等與政治相關資訊的頻率越高，可能就會令其吸收更多公共議題相關知識，逐漸提高對議題的理解程度，可能會開始對議題產生想法，進而擁有公民討論參與的意願，反之，則可能由於對議題的不理解，進而造成參與會提升公民的參與成本(花費額外時間與精力理解議題)，造成參與意願下降。

問卷體:C19.您常不常經由電視、報紙、廣播或網路得到政治新聞與訊息?

A4:與他人進行社會議題討論的頻率可能會影響參與公民討論的意願?

個人論點是，一個人在日常中若經常與他人進行交流各種社會議題，可能代表著其具有更多表達自身看法、聽取他人意見及以及討論交流的能力，也意味著他可能在議題討論方面較有興趣。在面對政策討論相關的活動時，會有較高的參與意願。

問卷體:G3.您過去一年來常不常跟人(認識或不認識的人都算)談論社會上發生的事情(包括政治、經濟、社會各方面)?

A5:社區組織參與，可能會影響公民討論參與意願?

我的假設是，一般來說具有參與過社區組織的經驗，能夠令個人學習到協調、配合、設計、執行等經驗，而這些經驗其實與公民討論參與的形式大同小異，並且擁有社區參與經驗可能意味著個人具有對公共事務具有高度熱忱。

問卷體:G5.您有沒有參加住家附近的社區組織?

三、資料集的基本情況

本研究使用「臺灣社會變遷基本調查計畫2023第八期第四次：國家認同與公民權組」（Taiwan Social Change Survey, TSCS 2023）作為研究資料。該調查由中央研究院社會學研究所執行，由吳齊殷擔任計畫主持人，並且經國家科學及技術委員會提供經費補助。調查內容主要涉及臺灣民眾的國家認同、公民權及公共事務相關態度，因此適合用於本研究探討民眾參與公共政策討論的意願，以及可能與參與意願相關的因素。本研究所使用的原始資料取自中央研究院人文社會科學研究中心調查研究專題中心建置的學術調查研究資料庫（Survey Research Data Archive, SRDA），資料編號為C00401_1。

在調查設計方面，本調查以常住於臺灣地區（不含金門縣及連江縣）、年齡18歲（含）以上的一般民眾作為研究母體，並以內政部所提供的地址清冊作為抽樣依據。抽樣方法採用分層多階段機率比例抽樣法（Stratified Multi-stage Probability Proportional to Size Sampling, PPS），依據地理分層及抽樣程序選取受訪對象。調查以面對面訪問方式進行，正式訪問期間為2023年6月5日至2024年1月31日，最終「國家認同與公民權組」受訪者或觀察值（N）為1563。

本研究將利用此份調查資料，分析臺灣民眾對公共政策討論的參與意願，並進一步探討個人背景、政治態度及日常公共參與經驗等因素與參與意願之間的關聯。

資料連結:https://srda.sinica.edu.tw/search/survey/detail/C00401_1/1736761

四、讀取、確認資料

#用此指令顯示／確認專案（.Rproj）目前的路徑

here::here()

[1] "C:/Users/user/Desktop/R/民意與政治行為研究計分作業"

#載入讀取資料套件

library(sjlabelled)

#讀入原始資料

tscs2023 <- read_spss("C:/Users/user/Desktop/R/民意與政治行為研究計分作業/tscs2023q1.sav")

Converting atomic to factors. Please wait...

#存備份檔（到本作業資料夾中）

save(tscs2023,
     file = "tscs2023.rda",
     compress = T
)

#查看觀察值數量

nrow(tscs2023)

[1] 1563

#查看變數項目與名稱

names(tscs2023)

  [1] "id"            "zip"           "zipr"          "stratum2"     
  [5] "region"        "stratum2014"   "region2014"    "r_stratum2014"
  [9] "psu"           "ssu"           "wsel0"         "wsel"         
 [13] "wr4"           "wr14"          "qtype"         "year"         
 [17] "year_m"        "sdt1"          "sdt2"          "a1"           
 [21] "a2y"           "a2m"           "a2r"           "a3"           
 [25] "a3zip"         "a4"            "a4zip"         "a5"           
 [29] "ka5"           "ka5zip"        "a6"            "ka6"          
 [33] "a7"            "a8"            "ka8"           "a9"           
 [37] "ka9"           "a10"           "ka10"          "a11"          
 [41] "ka11"          "a12"           "ka12"          "a13"          
 [45] "ka13"          "a14"           "b1"            "kb1"          
 [49] "b2"            "b2a"           "b3"            "kb3"          
 [53] "b4"            "b5y"           "b5m"           "b5r"          
 [57] "b6"            "kb6"           "b7"            "kb7"          
 [61] "b8"            "kb8"           "b9"            "kb9"          
 [65] "b10"           "kb10"          "c1a"           "c1b"          
 [69] "c1c"           "c1d"           "c1e"           "c1f"          
 [73] "c2a"           "c2b"           "c2c"           "c2d"          
 [77] "c2e"           "c3"            "c4"            "c5a"          
 [81] "c5b"           "c5c"           "c5d"           "c5e"          
 [85] "c5f"           "c6a"           "c6b"           "c6c"          
 [89] "c6d"           "c6e"           "c6f"           "c7a"          
 [93] "c7b"           "c7c"           "c7d"           "c7e"          
 [97] "c8"            "c9"            "c10a"          "c10b"         
[101] "c10c"          "c10d"          "c10e"          "c11a"         
[105] "c11b"          "c11c"          "c12a"          "c12b"         
[109] "c12c"          "c12d"          "c13"           "c14"          
[113] "c15a"          "c15b"          "c16"           "c17"          
[117] "c18a"          "c18b"          "c18c"          "c18d"         
[121] "c18e"          "c19"           "c20"           "c21"          
[125] "c22"           "c23"           "d1"            "d2"           
[129] "d3"            "d4"            "d5"            "d6"           
[133] "kd6"           "d7"            "d8"            "d9"           
[137] "d10"           "d11"           "d12"           "d13"          
[141] "d14"           "d15a"          "d15b"          "d15c"         
[145] "d15d"          "d15e"          "d15f"          "d15g"         
[149] "d15h"          "d15i"          "d15j"          "d16"          
[153] "d17"           "d18a"          "d18b"          "d18c"         
[157] "d18d"          "d18e"          "d19"           "d20"          
[161] "e1"            "e2"            "e3a"           "e3b1"         
[165] "e3b2"          "e3b3"          "e3c"           "ke3c"         
[169] "e4"            "e5a"           "e5b"           "e5c"          
[173] "e5d"           "e5e"           "f1a"           "f1b"          
[177] "f1c"           "f2a"           "f2b"           "f2c"          
[181] "f3a"           "f3b"           "f3c"           "f4a"          
[185] "f4b"           "f4c"           "g1"            "g2a"          
[189] "g2b"           "g3"            "g3a"           "g3b"          
[193] "g4"            "g4a"           "g5"            "g6a"          
[197] "g6b"           "g6c"           "g6d"           "h1a"          
[201] "h1b"           "h2"            "kh2"           "h3"           
[205] "h4"            "kh4"           "h5"            "kh5"          
[209] "h6a"           "kh6a"          "h6b"           "h7"           
[213] "h8"            "kh8"           "h9"            "kh9"          
[217] "h10"           "h11"           "j1"            "kj1"          
[221] "j2"            "j3"            "j4a3"          "j4b4"         
[225] "j4b5"          "j4c"           "j5"            "kj5"          
[229] "j5a"           "j6"            "j7"            "j8"           
[233] "kj8"           "j9"            "j10"           "j11a3"        
[237] "j11b4"         "j11b5"         "j11c"          "j12"          
[241] "kj12"          "j13"           "j14"           "j15a"         
[245] "j15b"          "j15c"          "j15d"          "j15e"         
[249] "j16"           "j17"           "j18"           "j19"          
[253] "edt1"          "edt2"          "agegp"         "edugp4"       
[257] "stratumgp"

#查看變數結構

str(tscs2023)

'data.frame':   1563 obs. of  257 variables:
 $ id           : num  1e+06 1e+06 1e+06 1e+06 1e+06 ...
  ..- attr(*, "label")= chr "id樣本編號"
  ..- attr(*, "format.spss")= chr "F8.0"
 $ zip          : Factor w/ 67 levels "100","103","104",..: 1 1 1 1 1 1 1 1 1 1 ...
  ..- attr(*, "labels")= Named num [1:369] -8 -7 -6 100 103 104 105 106 108 110 ...
  .. ..- attr(*, "names")= chr [1:369] "拒答" "不知道" "跳答" "台北市中正區" ...
  ..- attr(*, "label")= chr "zip(抽樣地區)郵遞區號"
 $ zipr         : Factor w/ 68 levels "100","103","104",..: 1 1 1 1 1 1 1 1 1 1 ...
  ..- attr(*, "labels")= Named num [1:372] -8 -7 -6 100 103 104 105 106 108 110 ...
  .. ..- attr(*, "names")= chr [1:372] "拒答" "不知道" "跳答" "台北市中正區" ...
  ..- attr(*, "label")= chr "zipr(抽樣地區)郵遞區號r"
 $ stratum2     : Factor w/ 6 levels "1","2","3","4",..: 1 1 1 1 1 1 1 1 1 1 ...
  ..- attr(*, "labels")= Named num [1:6] 1 2 3 4 5 6
  .. ..- attr(*, "names")= chr [1:6] "都會核心" "工商市區" "新興市鎮" "傳統產業市鎮" ...
  ..- attr(*, "label")= chr "2005層別代碼"
 $ region       : Factor w/ 6 levels "1","2","3","4",..: 1 1 1 1 1 1 1 1 1 1 ...
  ..- attr(*, "labels")= Named num [1:6] 1 2 3 4 5 6
  .. ..- attr(*, "names")= chr [1:6] "北北基" "桃竹苗" "中彰投" "雲嘉南" ...
  ..- attr(*, "label")= chr "2005地理區代碼"
 $ stratum2014  : num  1 1 1 1 1 1 1 1 1 1 ...
  ..- attr(*, "label")= chr "2014層別代碼"
  ..- attr(*, "format.spss")= chr "F8.0"
 $ region2014   : Factor w/ 6 levels "1","2","3","4",..: 1 1 1 1 1 1 1 1 1 1 ...
  ..- attr(*, "labels")= Named num [1:6] 1 2 3 4 5 6
  .. ..- attr(*, "names")= chr [1:6] "北北基宜" "桃竹苗" "中彰投" "雲嘉南" ...
  ..- attr(*, "label")= chr "2014地理區代碼"
 $ r_stratum2014: Factor w/ 19 levels "11","12","13",..: 1 1 1 1 1 1 1 1 1 1 ...
  ..- attr(*, "labels")= Named num [1:19] 11 12 13 14 21 22 23 31 32 33 ...
  .. ..- attr(*, "names")= chr [1:19] "北北基宜之第1分層" "北北基宜之第2分層" "北北基宜之第3分層" "北北基宜之第4分層" ...
  ..- attr(*, "label")= chr "2014地理區與層別代碼"
 $ psu          : chr  "1" "1" "1" "1" ...
  ..- attr(*, "label")= chr "第一抽出單位"
  ..- attr(*, "format.spss")= chr "A6"
 $ ssu          : num  1 1 1 1 2 3 3 3 3 3 ...
  ..- attr(*, "label")= chr "第二抽出單位"
  ..- attr(*, "format.spss")= chr "F8.0"
 $ wsel0        : num  0.752 0.752 0.752 0.752 0.752 ...
  ..- attr(*, "label")= chr "wsel0 不等機率加權權值(抽樣)"
  ..- attr(*, "format.spss")= chr "F8.2"
  ..- attr(*, "display_width")= int 10
 $ wsel         : num  0.729 0.729 0.729 0.729 0.729 ...
  ..- attr(*, "label")= chr "wsel 不等機率加權權值 加權變項"
  ..- attr(*, "format.spss")= chr "F8.2"
  ..- attr(*, "display_width")= int 10
 $ wr4          : num  1.24 1.19 1.09 1.09 1.24 ...
  ..- attr(*, "label")= chr "建立在初始權值等於不等機率加權權值，且以教育程度4分類進行加權之多變項反覆加權權值 加權變項"
  ..- attr(*, "format.spss")= chr "F8.2"
  ..- attr(*, "display_width")= int 10
 $ wr14         : num  1.27 1.22 1.11 1.11 1.27 ...
  ..- attr(*, "label")= chr "建立在初始權值等於1權值，且以教育程度4分類進行加權之多變項反覆加權權值 加權變項"
  ..- attr(*, "format.spss")= chr "F8.2"
  ..- attr(*, "display_width")= int 10
 $ qtype        : chr  "卷一" "卷一" "卷一" "卷一" ...
  ..- attr(*, "label")= chr "qtype問卷別"
  ..- attr(*, "format.spss")= chr "A18"
 $ year         : num  2024 2023 2024 2024 2024 ...
  ..- attr(*, "label")= chr "year調查年(西元年)"
  ..- attr(*, "format.spss")= chr "F8.0"
 $ year_m       : num  113 112 113 113 113 112 113 112 113 113 ...
  ..- attr(*, "label")= chr "year_m調查年(民國年)"
  ..- attr(*, "format.spss")= chr "F8.0"
 $ sdt1         : num  109 1216 126 125 127 ...
  ..- attr(*, "label")= chr "sdt1訪問開始時間:__月__日"
  ..- attr(*, "format.spss")= chr "F8.0"
 $ sdt2         : num  1358 1120 1357 1923 1330 ...
  ..- attr(*, "label")= chr "sdt2訪問開始時間:__時__分(24小時制)"
  ..- attr(*, "format.spss")= chr "F8.0"
 $ a1           : Factor w/ 2 levels "1","2": 2 2 1 1 2 2 2 2 1 2 ...
  ..- attr(*, "labels")= Named num [1:2] 1 2
  .. ..- attr(*, "names")= chr [1:2] "男" "女"
  ..- attr(*, "label")= chr "A1.性別"
 $ a2y          : num  83 42 44 42 83 78 47 55 58 67 ...
  ..- attr(*, "label")= chr "A2.您是什麼時候出生的(以身分證上的為主)?民國年"
  ..- attr(*, "format.spss")= chr "F8.0"
  ..- attr(*, "labels")= Named num [1:3] -8 -7 -6
  .. ..- attr(*, "names")= chr [1:3] "拒答" "不知道" "跳答"
 $ a2m          : num  11 6 10 1 11 2 8 11 2 1 ...
  ..- attr(*, "label")= chr "A2.您是什麼時候出生的(以身分證上的為主)?月"
  ..- attr(*, "format.spss")= chr "F8.0"
  ..- attr(*, "labels")= Named num [1:3] -8 -7 -6
  .. ..- attr(*, "names")= chr [1:3] "拒答" "不知道" "跳答"
 $ a2r          : num  -6 -6 -6 -6 -6 -6 -6 -6 -6 -6 ...
  ..- attr(*, "label")= chr "A2r.忘記出生年，請回答歲數(實歲)"
  ..- attr(*, "format.spss")= chr "F8.0"
  ..- attr(*, "labels")= Named num [1:3] -8 -7 -6
  .. ..- attr(*, "names")= chr [1:3] "拒答" "不知道" "跳答"
 $ a3           : chr  "台北市中正區" "台南市南區" "新竹縣新埔鎮" "台北市中正區" ...
  ..- attr(*, "label")= chr "A3.您在什麼地方出生的?省/縣/市鄉/鎮/市/區"
  ..- attr(*, "format.spss")= chr "A63"
 $ a3zip        : Factor w/ 312 levels "-7","2","3","4",..: 20 206 77 20 137 263 79 180 20 103 ...
  ..- attr(*, "labels")= Named num [1:476] -9 -8 -7 -6 -4 -3 -2 1 2 3 ...
  .. ..- attr(*, "names")= chr [1:476] "遺漏值" "拒答" "不知道" "跳答" ...
  ..- attr(*, "label")= chr "A3.您在什麼地方出生的?"
 $ a4           : chr  "台北市中正區" "台南市南區" "台北市大安區" "台北市中正區" ...
  ..- attr(*, "label")= chr "A4.您15歲以前，在哪裡住最久?省/縣/市鄉/鎮/市/區"
  ..- attr(*, "format.spss")= chr "A54"
 $ a4zip        : Factor w/ 290 levels "2","4","7","9",..: 18 193 22 18 127 18 73 170 18 44 ...
  ..- attr(*, "labels")= Named num [1:476] -9 -8 -7 -6 -4 -3 -2 1 2 3 ...
  .. ..- attr(*, "names")= chr [1:476] "遺漏值" "拒答" "不知道" "跳答" ...
  ..- attr(*, "label")= chr "A4.您15歲以前，在哪裡住最久?"
 $ a5           : Factor w/ 4 levels "1","2","3","4": 1 1 1 1 3 1 3 1 1 2 ...
  ..- attr(*, "labels")= Named num [1:6] -8 -7 1 2 3 4
  .. ..- attr(*, "names")= chr [1:6] "拒答" "不知道" "是 （跳答A7）" "否，但戶籍所在地與現住地址位於同一鄉鎮市區" ...
  ..- attr(*, "label")= chr "A5.您自己的戶籍是不是設在這個地址(樣本名單上的門牌地址)?"
 $ ka5          : chr  "-6" "-6" "-6" "-6" ...
  ..- attr(*, "label")= chr "A5.您自己的戶籍是不是設在這個地址(樣本名單上的門牌地址)?(03)否，戶籍所在地為省/縣/市鄉/鎮/市/區"
  ..- attr(*, "format.spss")= chr "A54"
 $ ka5zip       : Factor w/ 150 levels "100","103","104",..: NA NA NA NA 66 NA 34 NA NA NA ...
  ..- attr(*, "labels")= Named num [1:476] -9 -8 -7 -6 -4 -3 -2 1 2 3 ...
  .. ..- attr(*, "names")= chr [1:476] "遺漏值" "拒答" "不知道" "跳答" ...
  ..- attr(*, "label")= chr "kA5.受訪者戶籍所在地與樣本名單門牌地址位於不同鄉鎮市區，請勾選戶籍所在地的「縣市」與「鄉鎮市區」:"
 $ a6           : Factor w/ 9 levels "-8","-6","1",..: 2 2 2 2 7 2 3 2 2 4 ...
  ..- attr(*, "labels")= Named num [1:9] -8 -6 1 2 3 4 5 6 7
  .. ..- attr(*, "names")= chr [1:9] "拒答" "跳答" "工作因素" "自己或子女就學因素" ...
  ..- attr(*, "label")= chr "A6.您的戶籍所在地跟現住地址不同，主要的原因是?"
 $ ka6          : chr  "" "" "" "" ...
  ..- attr(*, "label")= chr "A6.您的戶籍所在地跟現住地址不同，主要的原因是?(07)其他，請說明"
  ..- attr(*, "format.spss")= chr "A117"
 $ a7           : Factor w/ 6 levels "-7","1","2","3",..: 4 2 2 2 2 4 2 2 2 2 ...
  ..- attr(*, "labels")= Named num [1:7] -8 -7 1 2 3 4 5
  .. ..- attr(*, "names")= chr [1:7] "拒答" "不知道" "大都市" "大都市旁的郊區" ...
  ..- attr(*, "label")= chr "A7.您覺得現在所居住的地方是都市或鄉村?"
 $ a8           : Factor w/ 9 levels "-7","1","2","3",..: 2 2 3 4 2 2 4 2 2 3 ...
  ..- attr(*, "labels")= Named num [1:11] -8 -7 1 2 3 4 5 6 7 8 ...
  .. ..- attr(*, "names")= chr [1:11] "拒答" "不知道" "台灣閩南人" "台灣客家人" ...
  ..- attr(*, "label")= chr "A8.您父親是哪裡人?【訪員請唸選項】"
 $ ka8          : chr  "" "" "" "" ...
  ..- attr(*, "label")= chr "A8.您父親是哪裡人?(09)其他，請說明"
  ..- attr(*, "format.spss")= chr "A27"
 $ a9           : Factor w/ 4 levels "-7","1","2","3": 2 2 2 3 2 2 3 2 2 2 ...
  ..- attr(*, "labels")= Named num [1:5] -8 -7 1 2 3
  .. ..- attr(*, "names")= chr [1:5] "拒答" "不知道" "台灣" "中國大陸" ...
  ..- attr(*, "label")= chr "A9.您父親是在哪一個國家出生的?"
 $ ka9          : chr  "" "" "" "" ...
  ..- attr(*, "label")= chr "A9.您父親是在哪一個國家出生的?(03)其他國家，請說明"
  ..- attr(*, "format.spss")= chr "A36"
 $ a10          : Factor w/ 9 levels "-7","1","2","3",..: 4 2 3 4 2 2 3 2 2 2 ...
  ..- attr(*, "labels")= Named num [1:11] -8 -7 1 2 3 4 5 6 7 8 ...
  .. ..- attr(*, "names")= chr [1:11] "拒答" "不知道" "台灣閩南人" "台灣客家人" ...
  ..- attr(*, "label")= chr "A10.您母親是哪裡人?【訪員請唸選項】"
 $ ka10         : chr  "" "" "" "" ...
  ..- attr(*, "label")= chr "A10.您母親是哪裡人?(09)其他，請說明"
  ..- attr(*, "format.spss")= chr "A27"
 $ a11          : Factor w/ 4 levels "-7","1","2","3": 2 2 2 3 2 2 2 2 2 2 ...
  ..- attr(*, "labels")= Named num [1:5] -8 -7 1 2 3
  .. ..- attr(*, "names")= chr [1:5] "拒答" "不知道" "台灣" "中國大陸" ...
  ..- attr(*, "label")= chr "A11.您母親是在哪一個國家出生的?"
 $ ka11         : chr  "" "" "" "" ...
  ..- attr(*, "label")= chr "A11.您母親是在哪一個國家出生的?(03)其他國家，請說明"
  ..- attr(*, "format.spss")= chr "A36"
 $ a12          : Factor w/ 9 levels "-7","1","2","3",..: 2 2 3 4 2 2 4 2 2 3 ...
  ..- attr(*, "labels")= Named num [1:11] -8 -7 1 2 3 4 5 6 7 8 ...
  .. ..- attr(*, "names")= chr [1:11] "拒答" "不知道" "台灣閩南人" "台灣客家人" ...
  ..- attr(*, "label")= chr "A12.您是哪裡人?"
 $ ka12         : chr  "" "" "" "" ...
  ..- attr(*, "label")= chr "A12.您是哪裡人?(09)其他，請說明"
  ..- attr(*, "format.spss")= chr "A54"
 $ a13          : Factor w/ 10 levels "1","2","3","4",..: 2 2 3 9 9 8 2 2 1 2 ...
  ..- attr(*, "labels")= Named num [1:11] -8 1 2 3 4 5 6 7 8 9 ...
  .. ..- attr(*, "names")= chr [1:11] "拒答" "佛教，有皈依" "佛教，未皈依" "道教" ...
  ..- attr(*, "label")= chr "A13.您目前的宗教信仰(臺語:信什麼教)?"
 $ ka13         : chr  "" "" "" "" ...
  ..- attr(*, "label")= chr "A13.您目前的宗教信仰(臺語:信什麼教)?(10)其他，請說明"
  ..- attr(*, "format.spss")= chr "A117"
 $ a14          : Factor w/ 8 levels "1","2","3","4",..: 8 5 8 7 7 5 7 7 5 7 ...
  ..- attr(*, "labels")= Named num [1:9] -8 1 2 3 4 5 6 7 8
  .. ..- attr(*, "names")= chr [1:9] "拒答" "每星期好幾次" "每星期一次" "一個月兩、三次" ...
  ..- attr(*, "label")= chr "A14.您常不常參加宗教活動(例如:進香、禪修、做禮拜、靈修聚會、宗教志工服務)，大概多久一次?"
 $ b1           : Factor w/ 22 levels "1","2","3","4",..: 19 3 8 9 19 19 8 6 19 11 ...
  ..- attr(*, "labels")= Named num [1:23] -8 1 2 3 4 5 6 7 8 9 ...
  .. ..- attr(*, "names")= chr [1:23] "拒答" "無／不識字 （跳答B3）" "自修／識字／私塾 （跳答B3）" "小學" ...
  ..- attr(*, "label")= chr "B1.您的教育程度是:"
 $ kb1          : chr  "" "" "" "" ...
  ..- attr(*, "label")= chr "B1.您的教育程度是:(22)其他，請說明"
  ..- attr(*, "format.spss")= chr "A108"
 $ b2           : num  16 6 12 12 16 16 12 12 13 14 ...
  ..- attr(*, "label")= chr "B2.從國小一年級算起，您總共受幾年的學校教育?__年"
  ..- attr(*, "format.spss")= chr "F8.0"
  ..- attr(*, "labels")= Named num [1:2] -8 -6
  .. ..- attr(*, "names")= chr [1:2] "拒答" "跳答"
 $ b2a          : chr  "0" "0" "0" "6＋3＋2.5＝12" ...
  ..- attr(*, "label")= chr "B2a.請詳細記錄各求學階段的年數或特殊狀況:"
  ..- attr(*, "format.spss")= chr "A216"
  ..- attr(*, "labels")= Named chr [1:2] "-6" "-8"
  .. ..- attr(*, "names")= chr [1:2] "跳答" "拒答"
 $ b3           : Factor w/ 6 levels "1","2","3","4",..: 1 6 2 2 1 2 6 4 1 2 ...
  ..- attr(*, "labels")= Named num [1:8] -8 1 2 3 4 5 6 7
  .. ..- attr(*, "names")= chr [1:8] "拒答" "單身且從沒結過婚" "已婚有偶且與配偶同住（跳答B5）" "已婚有偶但沒有與配偶同住（跳答B5）" ...
  ..- attr(*, "label")= chr "B3.您目前的婚姻狀況是?"
 $ kb3          : chr  "" "" "" "" ...
  ..- attr(*, "label")= chr "B3.您目前的婚姻狀況是?(07)其他，請說明"
  ..- attr(*, "format.spss")= chr "A3"
 $ b4           : Factor w/ 4 levels "-6","1","2","3": 4 4 1 1 4 1 4 4 4 1 ...
  ..- attr(*, "labels")= Named num [1:5] -8 -6 1 2 3
  .. ..- attr(*, "names")= chr [1:5] "拒答" "跳答" "有同住的伴侶" "有伴侶但沒有同住" ...
  ..- attr(*, "label")= chr "B4.您目前有沒有同住在一起的伴侶?"
 $ b5y          : num  -6 -6 51 44 -6 72 -6 -6 -6 62 ...
  ..- attr(*, "label")= chr "B5.您的配偶(或伴侶)是什麼時候出生的(以身分證上的為主)?民國年"
  ..- attr(*, "format.spss")= chr "F8.0"
  ..- attr(*, "labels")= Named num [1:3] -8 -7 -6
  .. ..- attr(*, "names")= chr [1:3] "拒答" "不知道" "跳答"
 $ b5m          : num  -6 -6 4 11 -6 9 -6 -6 -6 8 ...
  ..- attr(*, "label")= chr "B5.您的配偶(或伴侶)是什麼時候出生的(以身分證上的為主)?月"
  ..- attr(*, "format.spss")= chr "F8.0"
  ..- attr(*, "labels")= Named num [1:3] -8 -7 -6
  .. ..- attr(*, "names")= chr [1:3] "拒答" "不知道" "跳答"
 $ b5r          : num  -6 -6 -6 -6 -6 -6 -6 -6 -6 -6 ...
  ..- attr(*, "label")= chr "B5r.忘記出生年，請回答歲數(實歲)"
  ..- attr(*, "format.spss")= chr "F8.0"
  ..- attr(*, "labels")= Named num [1:3] -8 -7 -6
  .. ..- attr(*, "names")= chr [1:3] "拒答" "不知道" "跳答"
 $ b6           : Factor w/ 24 levels "-8","-7","-6",..: 3 3 10 6 3 13 3 3 3 13 ...
  ..- attr(*, "labels")= Named num [1:25] -8 -7 -6 1 2 3 4 5 6 7 ...
  .. ..- attr(*, "names")= chr [1:25] "拒答" "不知道" "跳答" "無／不識字" ...
  ..- attr(*, "label")= chr "B6.您配偶(或伴侶)的教育程度是:"
 $ kb6          : chr  "" "" "" "" ...
  ..- attr(*, "label")= chr "B6.您配偶(或伴侶)的教育程度是:(22)其他，請說明"
  ..- attr(*, "format.spss")= chr "A45"
 $ b7           : Factor w/ 12 levels "-8","-7","-6",..: 3 3 5 4 3 5 3 3 3 5 ...
  ..- attr(*, "labels")= Named num [1:12] -8 -7 -6 1 2 3 4 5 6 7 ...
  .. ..- attr(*, "names")= chr [1:12] "拒答" "不知道" "跳答" "台灣閩南人" ...
  ..- attr(*, "label")= chr "B7.您配偶(或伴侶)的父親是哪裡人?"
 $ kb7          : chr  "" "" "" "" ...
  ..- attr(*, "label")= chr "B7.您配偶(或伴侶)的父親是哪裡人?(09)其他，請說明"
  ..- attr(*, "format.spss")= chr "A36"
 $ b8           : Factor w/ 12 levels "-8","-7","-6",..: 3 3 4 4 3 4 3 3 3 5 ...
  ..- attr(*, "labels")= Named num [1:12] -8 -7 -6 1 2 3 4 5 6 7 ...
  .. ..- attr(*, "names")= chr [1:12] "拒答" "不知道" "跳答" "台灣閩南人" ...
  ..- attr(*, "label")= chr "B8.您配偶(或伴侶)的母親是哪裡人?"
 $ kb8          : chr  "" "" "" "" ...
  ..- attr(*, "label")= chr "B8.您配偶(或伴侶)的母親是哪裡人?(09)其他，請說明"
  ..- attr(*, "format.spss")= chr "A27"
 $ b9           : Factor w/ 22 levels "-7","1","2","3",..: 4 3 2 13 9 22 4 4 2 9 ...
  ..- attr(*, "labels")= Named num [1:24] -8 -7 1 2 3 4 5 6 7 8 ...
  .. ..- attr(*, "names")= chr [1:24] "拒答" "不知道" "無／不識字" "自修／識字／私塾" ...
  ..- attr(*, "label")= chr "B9.您父親的教育程度是:"
 $ kb9          : chr  "" "" "" "" ...
  ..- attr(*, "label")= chr "B9.您父親的教育程度是:(22)其他，請說明"
  ..- attr(*, "format.spss")= chr "A171"
 $ b10          : Factor w/ 18 levels "-7","1","2","3",..: 10 3 2 6 8 6 4 2 5 5 ...
  ..- attr(*, "labels")= Named num [1:24] -8 -7 1 2 3 4 5 6 7 8 ...
  .. ..- attr(*, "names")= chr [1:24] "拒答" "不知道" "無／不識字" "自修／識字／私塾" ...
  ..- attr(*, "label")= chr "B10.您母親的教育程度是:"
 $ kb10         : chr  "" "" "" "" ...
  ..- attr(*, "label")= chr "B10.您母親的教育程度是:(22)其他，請說明"
  ..- attr(*, "format.spss")= chr "A144"
 $ c1a          : Factor w/ 5 levels "-4","1","2","3",..: 3 2 4 4 4 3 4 4 2 4 ...
  ..- attr(*, "labels")= Named num [1:5] -4 1 2 3 4
  .. ..- attr(*, "names")= chr [1:5] "無法選擇" "非常重要" "有點重要" "不怎麼重要" ...
  ..- attr(*, "label")= chr "C1a.如果要成為我們真正的同胞，您覺得在我國(中華民國/臺灣)出生重不重要?"
 $ c1b          : Factor w/ 5 levels "-4","1","2","3",..: 3 2 3 2 2 4 2 4 2 2 ...
  ..- attr(*, "labels")= Named num [1:5] -4 1 2 3 4
  .. ..- attr(*, "names")= chr [1:5] "無法選擇" "非常重要" "有點重要" "不怎麼重要" ...
  ..- attr(*, "label")= chr "C1b.如果要成為我們真正的同胞，您覺得有我國的國籍重不重要?"
 $ c1c          : Factor w/ 5 levels "-4","1","2","3",..: 5 4 4 4 5 5 5 4 5 5 ...
  ..- attr(*, "labels")= Named num [1:5] -4 1 2 3 4
  .. ..- attr(*, "names")= chr [1:5] "無法選擇" "非常重要" "有點重要" "不怎麼重要" ...
  ..- attr(*, "label")= chr "C1c.如果要成為我們真正的同胞，您覺得有沒有拜拜重不重要?"
 $ c1d          : Factor w/ 5 levels "-4","1","2","3",..: 3 2 3 2 2 2 2 2 2 2 ...
  ..- attr(*, "labels")= Named num [1:5] -4 1 2 3 4
  .. ..- attr(*, "names")= chr [1:5] "無法選擇" "非常重要" "有點重要" "不怎麼重要" ...
  ..- attr(*, "label")= chr "C1d.如果要成為我們真正的同胞，您覺得尊重我國的政治體制和法律重不重要?"
 $ c1e          : Factor w/ 5 levels "-4","1","2","3",..: 3 2 4 2 2 2 2 3 2 3 ...
  ..- attr(*, "labels")= Named num [1:5] -4 1 2 3 4
  .. ..- attr(*, "names")= chr [1:5] "無法選擇" "非常重要" "有點重要" "不怎麼重要" ...
  ..- attr(*, "label")= chr "C1e.如果要成為我們真正的同胞，您覺得在感情上認同我們的國家重不重要?"
 $ c1f          : Factor w/ 5 levels "-4","1","2","3",..: 4 2 5 2 3 3 5 3 3 5 ...
  ..- attr(*, "labels")= Named num [1:5] -4 1 2 3 4
  .. ..- attr(*, "names")= chr [1:5] "無法選擇" "非常重要" "有點重要" "不怎麼重要" ...
  ..- attr(*, "label")= chr "C1f.如果要成為我們真正的同胞，您覺得祖先都是本國人重不重要?"
 $ c2a          : Factor w/ 6 levels "-4","1","2","3",..: 3 2 5 3 2 2 2 2 2 3 ...
  ..- attr(*, "labels")= Named num [1:6] -4 1 2 3 4 5
  .. ..- attr(*, "names")= chr [1:6] "無法選擇" "非常同意" "同意" "*既不同意也不反對*" ...
  ..- attr(*, "label")= chr "C2a.您最想當我們國家的公民(國民)，而不是其他國家的公民(國民)。您同不同意這個說法?"
 $ c2b          : Factor w/ 6 levels "-4","1","2","3",..: 5 3 3 3 5 5 3 5 3 5 ...
  ..- attr(*, "labels")= Named num [1:6] -4 1 2 3 4 5
  .. ..- attr(*, "names")= chr [1:6] "無法選擇" "非常同意" "同意" "*既不同意也不反對*" ...
  ..- attr(*, "label")= chr "C2b.您覺得我們的國家目前有一些事情會讓您感到丟臉。您同不同意這個說法?"
 $ c2c          : Factor w/ 6 levels "-4","1","2","3",..: 5 2 3 3 5 3 5 3 5 5 ...
  ..- attr(*, "labels")= Named num [1:6] -4 1 2 3 4 5
  .. ..- attr(*, "names")= chr [1:6] "無法選擇" "非常同意" "同意" "*既不同意也不反對*" ...
  ..- attr(*, "label")= chr "C2c.如果全世界其他國家的人都像「我們國家的人」這樣，這個世界會更好。您同不同意這個說法?"
 $ c2d          : Factor w/ 6 levels "-4","1","2","3",..: 5 2 4 3 3 3 4 3 3 3 ...
  ..- attr(*, "labels")= Named num [1:6] -4 1 2 3 4 5
  .. ..- attr(*, "names")= chr [1:6] "無法選擇" "非常同意" "同意" "*既不同意也不反對*" ...
  ..- attr(*, "label")= chr "C2d.一般來說，我們的國家比大多數的其他國家都好。您同不同意這個說法?"
 $ c2e          : Factor w/ 6 levels "-4","1","2","3",..: 5 5 5 5 5 5 6 5 5 5 ...
  ..- attr(*, "labels")= Named num [1:6] -4 1 2 3 4 5
  .. ..- attr(*, "names")= chr [1:6] "無法選擇" "非常同意" "同意" "*既不同意也不反對*" ...
  ..- attr(*, "label")= chr "C2e.就算國家錯了，人民還是應該要支持。您同不同意這個說法?"
 $ c3           : Factor w/ 6 levels "-4","1","2","3",..: 3 5 5 3 2 3 6 3 3 3 ...
  ..- attr(*, "labels")= Named num [1:6] -4 1 2 3 4 5
  .. ..- attr(*, "names")= chr [1:6] "無法選擇" "非常同意" "同意" "*既不同意也不反對*" ...
  ..- attr(*, "label")= chr "C3.假如每一個民族(意指具有共同的特徵、文化、歷史或語言)，都可以獨立自主而且擁有自己主權的國家，這是最理想的情況"| __truncated__
 $ c4           : Factor w/ 5 levels "-4","1","2","3",..: 3 4 3 2 2 3 4 3 3 3 ...
  ..- attr(*, "labels")= Named num [1:5] -4 1 2 3 4
  .. ..- attr(*, "names")= chr [1:5] "無法選擇" "您完全同意A" "您同意A比較多，同意B比較少" "您同意B比較多，同意A比較少" ...
  ..- attr(*, "label")= chr "C4.有人認為，【A.一個人如果努力付出，就可能成為我們國家真正的國民。】。也有人認為，【B.要成為我們國家真正的國民"| __truncated__
 $ c5a          : Factor w/ 5 levels "-4","1","2","3",..: 4 4 4 3 2 3 2 3 2 2 ...
  ..- attr(*, "labels")= Named num [1:5] -4 1 2 3 4
  .. ..- attr(*, "names")= chr [1:5] "無法選擇" "非常光榮" "有些光榮" "不太光榮" ...
  ..- attr(*, "label")= chr "C5a.對我們國家的下列幾項事情，您感到光榮或是不光榮?民主政治運作的情形"
 $ c5b          : Factor w/ 5 levels "-4","1","2","3",..: 3 3 5 4 3 4 3 3 4 4 ...
  ..- attr(*, "labels")= Named num [1:5] -4 1 2 3 4
  .. ..- attr(*, "names")= chr [1:5] "無法選擇" "非常光榮" "有些光榮" "不太光榮" ...
  ..- attr(*, "label")= chr "C5b.對我們國家的下列幾項事情，您感到光榮或是不光榮?外交上的影響力"
 $ c5c          : Factor w/ 5 levels "-4","1","2","3",..: 3 3 3 3 3 3 2 2 3 3 ...
  ..- attr(*, "labels")= Named num [1:5] -4 1 2 3 4
  .. ..- attr(*, "names")= chr [1:5] "無法選擇" "非常光榮" "有些光榮" "不太光榮" ...
  ..- attr(*, "label")= chr "C5c.對我們國家的下列幾項事情，您感到光榮或是不光榮?經濟成就"
 $ c5d          : Factor w/ 5 levels "-4","1","2","3",..: 3 3 3 3 3 2 2 2 2 3 ...
  ..- attr(*, "labels")= Named num [1:5] -4 1 2 3 4
  .. ..- attr(*, "names")= chr [1:5] "無法選擇" "非常光榮" "有些光榮" "不太光榮" ...
  ..- attr(*, "label")= chr "C5d.對我們國家的下列幾項事情，您感到光榮或是不光榮?運動上的表現"
 $ c5e          : Factor w/ 5 levels "-4","1","2","3",..: 3 3 3 3 4 3 2 2 2 3 ...
  ..- attr(*, "labels")= Named num [1:5] -4 1 2 3 4
  .. ..- attr(*, "names")= chr [1:5] "無法選擇" "非常光榮" "有些光榮" "不太光榮" ...
  ..- attr(*, "label")= chr "C5e.對我們國家的下列幾項事情，您感到光榮或是不光榮?文學和藝術上的成就"
 $ c5f          : Factor w/ 5 levels "-4","1","2","3",..: 3 4 4 2 3 5 2 2 2 4 ...
  ..- attr(*, "labels")= Named num [1:5] -4 1 2 3 4
  .. ..- attr(*, "names")= chr [1:5] "無法選擇" "非常光榮" "有些光榮" "不太光榮" ...
  ..- attr(*, "label")= chr "C5f.對我們國家的下列幾項事情，您感到光榮或是不光榮?我國的歷史"
 $ c6a          : Factor w/ 6 levels "-4","1","2","3",..: 5 3 5 5 3 6 3 5 5 6 ...
  ..- attr(*, "labels")= Named num [1:6] -4 1 2 3 4 5
  .. ..- attr(*, "names")= chr [1:6] "無法選擇" "非常同意" "同意" "*既不同意也不反對*" ...
  ..- attr(*, "label")= chr "C6a.您同不同意為了保護我國的經濟，我們應該限制外國產品進口"
 $ c6b          : Factor w/ 6 levels "-4","1","2","3",..: 5 3 3 3 3 2 3 2 3 3 ...
  ..- attr(*, "labels")= Named num [1:6] -4 1 2 3 4 5
  .. ..- attr(*, "names")= chr [1:6] "無法選擇" "非常同意" "同意" "*既不同意也不反對*" ...
  ..- attr(*, "label")= chr "C6b.您同不同意國際組織應該有權利強制一個國家解決一些問題，例如環境污染"
 $ c6c          : Factor w/ 6 levels "-4","1","2","3",..: 5 6 5 3 5 3 5 5 2 6 ...
  ..- attr(*, "labels")= Named num [1:6] -4 1 2 3 4 5
  .. ..- attr(*, "names")= chr [1:6] "無法選擇" "非常同意" "同意" "*既不同意也不反對*" ...
  ..- attr(*, "label")= chr "C6c.您同不同意為了保護我們國家自己的利益，就算需要和其他國家發生衝突也無所謂"
 $ c6d          : Factor w/ 6 levels "-4","1","2","3",..: 3 2 3 5 3 3 2 3 5 5 ...
  ..- attr(*, "labels")= Named num [1:6] -4 1 2 3 4 5
  .. ..- attr(*, "names")= chr [1:6] "無法選擇" "非常同意" "同意" "*既不同意也不反對*" ...
  ..- attr(*, "label")= chr "C6d.您同不同意我們應該禁止外國人在我國購買土地"
 $ c6e          : Factor w/ 6 levels "-4","1","2","3",..: 5 2 5 3 5 3 5 3 3 6 ...
  ..- attr(*, "labels")= Named num [1:6] -4 1 2 3 4 5
  .. ..- attr(*, "names")= chr [1:6] "無法選擇" "非常同意" "同意" "*既不同意也不反對*" ...
  ..- attr(*, "label")= chr "C6e.您同不同意我國的電視應該優先播放我國的影片和節目"
 $ c6f          : Factor w/ 6 levels "-4","1","2","3",..: 5 5 5 5 5 5 1 1 5 3 ...
  ..- attr(*, "labels")= Named num [1:6] -4 1 2 3 4 5
  .. ..- attr(*, "names")= chr [1:6] "無法選擇" "非常同意" "同意" "*既不同意也不反對*" ...
  ..- attr(*, "label")= chr "C6f.您同不同意外國大公司(跨國企業)對臺灣本地產業的傷害越來越大"
 $ c7a          : Factor w/ 6 levels "-4","1","2","3",..: 5 3 3 5 5 3 5 3 5 5 ...
  ..- attr(*, "labels")= Named num [1:6] -4 1 2 3 4 5
  .. ..- attr(*, "names")= chr [1:6] "無法選擇" "非常同意" "同意" "*既不同意也不反對*" ...
  ..- attr(*, "label")= chr "C7a.您同不同意下面的說法?移民會使治安變差"
 $ c7b          : Factor w/ 6 levels "-4","1","2","3",..: 3 5 3 3 3 2 3 5 3 3 ...
  ..- attr(*, "labels")= Named num [1:6] -4 1 2 3 4 5
  .. ..- attr(*, "names")= chr [1:6] "無法選擇" "非常同意" "同意" "*既不同意也不反對*" ...
  ..- attr(*, "label")= chr "C7b您同不同意下面的說法?移民對臺灣的經濟有幫助"
 $ c7c          : Factor w/ 6 levels "-4","1","2","3",..: 5 3 5 5 3 5 5 3 3 5 ...
  ..- attr(*, "labels")= Named num [1:6] -4 1 2 3 4 5
  .. ..- attr(*, "names")= chr [1:6] "無法選擇" "非常同意" "同意" "*既不同意也不反對*" ...
  ..- attr(*, "label")= chr "C7c.您同不同意下面的說法?移民會搶走在臺灣出生的人的工作"
 $ c7d          : Factor w/ 6 levels "-4","1","2","3",..: 3 5 5 3 3 2 5 5 3 3 ...
  ..- attr(*, "labels")= Named num [1:6] -4 1 2 3 4 5
  .. ..- attr(*, "names")= chr [1:6] "無法選擇" "非常同意" "同意" "*既不同意也不反對*" ...
  ..- attr(*, "label")= chr "C7d.您同不同意下面的說法?移民會帶來新的想法和文化，讓我國社會更好"
 $ c7e          : Factor w/ 6 levels "-4","1","2","3",..: 5 5 5 3 3 3 2 3 3 3 ...
  ..- attr(*, "labels")= Named num [1:6] -4 1 2 3 4 5
  .. ..- attr(*, "names")= chr [1:6] "無法選擇" "非常同意" "同意" "*既不同意也不反對*" ...
  ..- attr(*, "label")= chr "C7e.您同不同意下面的說法?臺灣出生的人，他的工作、居住與健康照護需求，應該優先於外來移民"
 $ c8           : Factor w/ 6 levels "-4","1","2","3",..: 3 4 3 3 4 4 4 5 4 4 ...
  ..- attr(*, "labels")= Named num [1:6] -4 1 2 3 4 5
  .. ..- attr(*, "names")= chr [1:6] "無法選擇" "大幅增加" "增加一些" "維持現狀" ...
  ..- attr(*, "label")= chr "C8.您認為來臺灣居住的移民人數，未來應該要增加、減少還是維持現狀?"
 $ c9           : Factor w/ 4 levels "-4","1","2","3": 3 3 4 3 3 3 3 3 3 3 ...
  ..- attr(*, "labels")= Named num [1:4] -4 1 2 3
  .. ..- attr(*, "names")= chr [1:4] "無法選擇" "移民應該保留他們原來的文化，【不要採用】我國的文化" "移民應該保留他們原來的文化，【同時採用】我國的文化" "移民應該放棄他們原來的文化，【轉而接受】我國的文化"
  ..- attr(*, "label")= chr "C9.對於移民來臺灣的人，下面哪個想法是最符合您的看法?"
 $ c10a         : Factor w/ 8 levels "-4","1","2","3",..: 7 8 8 8 8 8 8 8 8 8 ...
  ..- attr(*, "labels")= Named num [1:8] -4 1 2 3 4 5 6 7
  .. ..- attr(*, "names")= chr [1:8] "無法選擇" "一點都不重要" "2" "3" ...
  ..- attr(*, "label")= chr "C10a.1表示「一點都不重要」，7表示「非常重要」，您個人認為從不逃稅，對作為一位好公民的重要程度是怎樣?"
  [list output truncated]

# 載入清理資料與重新編碼套件

library(sjmisc)

Install package "strengejacke" from GitHub (`devtools::install_github("strengejacke/strengejacke")`) to load all sj-packages at once!

#檢查概念B的原始變數之次數分配

frq(tscs2023$g4a)

G4a.如果政府在決定重大政策前，先召開會議讓一般民眾來討論，提出建議讓政府參考，您會參加嗎? (x) <categorical> 
# total N=1563 valid N=1563 mean=2.38 sd=0.92

Value |        Label |   N | Raw % | Valid % | Cum. %
-----------------------------------------------------
   -4 |     無法選擇 |   6 |  0.38 |    0.38 |   0.38
    1 |   一定會參加 | 142 |  9.09 |    9.09 |   9.47
    2 |   可能會參加 | 856 | 54.77 |   54.77 |  64.24
    3 | 可能不會參加 | 344 | 22.01 |   22.01 |  86.24
    4 | 一定不會參加 | 215 | 13.76 |   13.76 | 100.00
 <NA> |         <NA> |   0 |  0.00 |    <NA> |   <NA>

#檢查假設A1教育程度之次數分配

frq(tscs2023$b1)

B1.您的教育程度是: (x) <categorical> 
# total N=1563 valid N=1563 mean=11.71 sd=6.35

Value |                       Label |   N | Raw % | Valid % | Cum. %
--------------------------------------------------------------------
   -8 |                        拒答 |   0 |  0.00 |    0.00 |   0.00
    1 |       無／不識字 （跳答B3） |  10 |  0.64 |    0.64 |   0.64
    2 | 自修／識字／私塾 （跳答B3） |   5 |  0.32 |    0.32 |  44.27
    3 |                        小學 | 143 |  9.15 |    9.15 |  62.57
    4 |                  國（初）中 | 159 | 10.17 |   10.17 |  72.74
    5 |                        初職 |   1 |  0.06 |    0.06 |  72.81
    6 |                  高中普通科 |  79 |  5.05 |    5.05 |  77.86
    7 |                  高中職業科 |  26 |  1.66 |    1.66 |  79.53
    8 |                        高職 | 318 | 20.35 |   20.35 |  99.87
    9 |                    士官學校 |   2 |  0.13 |    0.13 | 100.00
   10 |                        五專 |  59 |  3.77 |    3.77 |   4.41
   11 |                        二專 | 108 |  6.91 |    6.91 |  11.32
   12 |                        三專 |  15 |  0.96 |    0.96 |  12.28
   13 |                軍警校專修班 |   1 |  0.06 |    0.06 |  12.35
   14 |                軍警校專科班 |   3 |  0.19 |    0.19 |  12.54
   15 |              空中行專／商專 |   5 |  0.32 |    0.32 |  12.86
   16 |                    空中大學 |   5 |  0.32 |    0.32 |  13.18
   17 |        軍警官校或軍警官大學 |   3 |  0.19 |    0.19 |  13.37
   18 |              技術學院、科大 | 191 | 12.22 |   12.22 |  25.59
   19 |                        大學 | 287 | 18.36 |   18.36 |  43.95
   20 |                        碩士 | 120 |  7.68 |    7.68 |  51.95
   21 |                        博士 |  22 |  1.41 |    1.41 |  53.36
   22 |        其他，請說明________ |   1 |  0.06 |    0.06 |  53.42
 <NA> |                        <NA> |   0 |  0.00 |    <NA> |   <NA>

#檢查假設A2政治效能感之次數分配(皆為外在效能感)

frq(tscs2023$c15a)

C15a.您同不同意下列這些說法?像您這樣的人，對政府的作為沒有任何影響力 (x) <categorical> 
# total N=1563 valid N=1563 mean=2.74 sd=1.39

Value |              Label |   N | Raw % | Valid % | Cum. %
-----------------------------------------------------------
   -4 |           無法選擇 |  19 |  1.22 |    1.22 |   1.22
    1 |           非常同意 | 166 | 10.62 |   10.62 |  11.84
    2 |               同意 | 688 | 44.02 |   44.02 |  55.85
    3 | *既不同意也不反對* |   7 |  0.45 |    0.45 |  56.30
    4 |             不同意 | 625 | 39.99 |   39.99 |  96.29
    5 |         非常不同意 |  58 |  3.71 |    3.71 | 100.00
 <NA> |               <NA> |   0 |  0.00 |    <NA> |   <NA>

frq(tscs2023$c15b)

C15b.您同不同意下列這些說法?您認為政府不在乎像您這樣的人的想法是什麼 (x) <categorical> 
# total N=1563 valid N=1563 mean=2.74 sd=1.43

Value |              Label |   N | Raw % | Valid % | Cum. %
-----------------------------------------------------------
   -4 |           無法選擇 |  21 |  1.34 |    1.34 |   1.34
    1 |           非常同意 | 182 | 11.64 |   11.64 |  12.99
    2 |               同意 | 659 | 42.16 |   42.16 |  55.15
    3 | *既不同意也不反對* |   6 |  0.38 |    0.38 |  55.53
    4 |             不同意 | 631 | 40.37 |   40.37 |  95.91
    5 |         非常不同意 |  64 |  4.09 |    4.09 | 100.00
 <NA> |               <NA> |   0 |  0.00 |    <NA> |   <NA>

#檢查假設A3資訊接收頻率之次數分配

frq(tscs2023$c19)

C19.您常不常經由電視、報紙、廣播或網路得到政治新聞與訊息? (x) <categorical> 
# total N=1563 valid N=1563 mean=2.44 sd=1.70

Value |         Label |   N | Raw % | Valid % | Cum. %
------------------------------------------------------
   -4 |      無法選擇 |   0 |  0.00 |    0.00 |   0.00
    1 |    一天好幾次 | 613 | 39.22 |   39.22 |  39.22
    2 |      每天一次 | 470 | 30.07 |   30.07 |  69.29
    3 |   每星期5-6天 |  82 |  5.25 |    5.25 |  74.54
    4 |   每星期3-4天 | 134 |  8.57 |    8.57 |  83.11
    5 |   每星期1-2天 | 147 |  9.40 |    9.40 |  92.51
    6 | 每星期不到1天 |  71 |  4.54 |    4.54 |  97.06
    7 |      從來沒有 |  46 |  2.94 |    2.94 | 100.00
 <NA> |          <NA> |   0 |  0.00 |    <NA> |   <NA>

#檢查假設A4社會議題討論頻率之次數分配

frq(tscs2023$g3)

G3.您過去一年來常不常跟人(認識或不認識的人都算)談論社會上發生的事情(包括政治、經濟、社會各方面)? (x) <categorical> 
# total N=1563 valid N=1563 mean=2.67 sd=0.84

Value |               Label |   N | Raw % | Valid % | Cum. %
------------------------------------------------------------
   -4 |            無法選擇 |   0 |  0.00 |    0.00 |   0.00
    1 |                常常 | 106 |  6.78 |    6.78 |   6.78
    2 |              有時候 | 574 | 36.72 |   36.72 |  43.51
    3 |                很少 | 608 | 38.90 |   38.90 |  82.41
    4 | 幾乎沒有 （跳答G4） | 275 | 17.59 |   17.59 | 100.00
 <NA> |                <NA> |   0 |  0.00 |    <NA> |   <NA>

#檢查假設A5社會組織參與情況之次數分配

frq(tscs2023$g5)

G5.您有沒有參加住家附近的社區組織? (x) <categorical> 
# total N=1563 valid N=1563 mean=2.40 sd=1.11

Value |        Label |    N | Raw % | Valid % | Cum. %
------------------------------------------------------
   -4 |     無法選擇 |   11 |  0.70 |    0.70 |   0.70
    1 | 沒有社區組織 |  105 |  6.72 |    6.72 |   7.42
    2 |   沒有參加過 | 1007 | 64.43 |   64.43 |  71.85
    3 |     很少參加 |  179 | 11.45 |   11.45 |  83.30
    4 |   有時會參加 |  173 | 11.07 |   11.07 |  94.37
    5 |     經常參加 |   88 |  5.63 |    5.63 | 100.00
 <NA> |         <NA> |    0 |  0.00 |    <NA> |   <NA>

五、變項清理

1.公民公共政策討論參與意願資料清理與編碼

# B 公民參與公共政策討論意願重新編碼

tscs2023$g4ar <- rec(tscs2023$g4a,
                 rec= "1=1[一定會參加];
                       2=2[可能會參加];
                       3=3[可能不會參加];
                       4=4[一定不會參加];
                       else=NA",
                 as.num = F)

#檢查資料清理後的次數分配與結構

frq(tscs2023$g4ar)

G4a.如果政府在決定重大政策前，先召開會議讓一般民眾來討論，提出建議讓政府參考，您會參加嗎? (x) <categorical> 
# total N=1563 valid N=1557 mean=2.41 sd=0.84

Value |        Label |   N | Raw % | Valid % | Cum. %
-----------------------------------------------------
    1 |   一定會參加 | 142 |  9.09 |    9.12 |   9.12
    2 |   可能會參加 | 856 | 54.77 |   54.98 |  64.10
    3 | 可能不會參加 | 344 | 22.01 |   22.09 |  86.19
    4 | 一定不會參加 | 215 | 13.76 |   13.81 | 100.00
 <NA> |         <NA> |   6 |  0.38 |    <NA> |   <NA>

str(tscs2023$g4ar)

 Factor w/ 4 levels "1","2","3","4": 2 2 4 3 2 2 2 3 2 2 ...
 - attr(*, "labels")= Named num [1:4] 1 2 3 4
  ..- attr(*, "names")= chr [1:4] "一定會參加" "可能會參加" "可能不會參加" "一定不會參加"
 - attr(*, "label")= chr "G4a.如果政府在決定重大政策前，先召開會議讓一般民眾來討論，提出建議讓政府參考，您會參加嗎?"

2.教育程度資料清理與編碼

此次研究將教育程度視為可能影響公民討論參與意願的其中一項因素，原始資料庫中將受訪者之教育程度區分為22個項目，考量到其中包含了部分學歷上較為特殊(士官學校、軍警專科/專修班、私塾等)，且有部分類別的受訪者/觀察值較少，因此本研究參考了教育部所制定的《中華民國教育程度標準分類-第五次修正》，依據其學制與教育層級之劃分，將教育程度重新分類為國小以下、國小、國中、高中、專科、學士、碩士、博士這幾個主要類別。而原始資料中的「無／不識字」暫歸入國小以下，「小學」歸入國民小學，「國（初）中」及「初職」歸入國民中學，原因在於教育部將舊制初級職業學校對應至國民中學教育。至於「高中普通科」、「高中職業科」及「高職」，雖然在教育內容上具有普通教育與職業教育的差異，但均屬於高級中等教育，因此合併為同一類別。「二專」、「三專」、「軍警專科班」及「空中行專／商專」則依其學制性質，暫歸入專科教育，「空中大學」、「軍警官學校或軍警官大學」、「技術學院、科大」及「大學」，則依學制名稱暫歸入學士教育。最後，「碩士」及「博士」分別保留為獨立的教育程度類別。

在此分類之下仍有些選項無法被歸類為上述任一學歷，「自修／識字／私塾」涉及非正式教育，教育部的分類標準並未直接將自學或識字能力視為特定的正式學歷，因此本研究將其另外保留為「自修或私塾」類別，避免直接將其認定為國民小學或其他正式教育程度。此外，教育部將五專前三年歸入高級中等教育，後二年歸入專科教育，但原始問卷並未提供受訪者具體的五專修業階段，因此無法僅依該選項判定其教育層級，因此本研究將五專統一歸入專科類別。至於「士官學校」、「軍警專修班」及「其他」，由於問卷未提供足以確認其正式學歷的資訊，本研究亦暫時將其視為遺失值進行清理。

# A1 教育程度重新編碼

tscs2023$b1r <- rec(tscs2023$b1,
                rec = "1=0[國小以下];
                       3=1[國民小學];
                       4,5=2[國民中學];
                       6,7,8=3[高等中學];
                       10,11,12,14,15=5[專科];
                       16,17,18,19=6[學士];
                       20=7[碩士];
                       21=8[博士];
                       2=9[自修或私塾];
                       9,13,22=NA",
                as.num = F)
 
#檢查資料清理後的次數分配與結構
 
frq(tscs2023$b1r)

B1.您的教育程度是: (x) <categorical> 
# total N=1563 valid N=1559 mean=4.27 sd=1.98

Value |      Label |   N | Raw % | Valid % | Cum. %
---------------------------------------------------
    0 |   國小以下 |  10 |  0.64 |    0.64 |   0.64
    1 |   國民小學 | 143 |  9.15 |    9.17 |   9.81
    2 |   國民中學 | 160 | 10.24 |   10.26 |  20.08
    3 |   高等中學 | 423 | 27.06 |   27.13 |  47.21
    5 |       專科 | 190 | 12.16 |   12.19 |  59.40
    6 |       學士 | 486 | 31.09 |   31.17 |  90.57
    7 |       碩士 | 120 |  7.68 |    7.70 |  98.27
    8 |       博士 |  22 |  1.41 |    1.41 |  99.68
    9 | 自修或私塾 |   5 |  0.32 |    0.32 | 100.00
 <NA> |       <NA> |   4 |  0.26 |    <NA> |   <NA>

str(tscs2023$b1r)

 Factor w/ 9 levels "0","1","2","3",..: 6 2 4 NA 6 6 4 4 6 5 ...
 - attr(*, "labels")= Named num [1:9] 0 1 2 3 5 6 7 8 9
  ..- attr(*, "names")= chr [1:9] "國小以下" "國民小學" "國民中學" "高等中學" ...
 - attr(*, "label")= chr "B1.您的教育程度是:"

3.政治效能感資料清理與編碼

在假設中原應以外在效能感與內在效能感作為假設的前提下去找尋相應之問卷體，但並未能於問卷體中找到相符之問題，因此僅能找尋到外在效能感相關之問卷變項作為資料並進行清理。

# A2 政治效能感重新編碼

# 1.外在政治效能感一
 
tscs2023$c15ar <- rec(tscs2023$c15a,
                  rec = "1=1[非常同意];
                         2=2[同意];
                         3=3[不同意也不反對];
                         4=4[不同意];
                         5=5[非常不同意];
                         else=NA",
                  as.num = F)

#檢查資料清理後的次數分配與結構

frq(tscs2023$c15ar)

C15a.您同不同意下列這些說法?像您這樣的人，對政府的作為沒有任何影響力 (x) <categorical> 
# total N=1563 valid N=1544 mean=2.82 sd=1.18

Value |          Label |   N | Raw % | Valid % | Cum. %
-------------------------------------------------------
    1 |       非常同意 | 166 | 10.62 |   10.75 |  10.75
    2 |           同意 | 688 | 44.02 |   44.56 |  55.31
    3 | 不同意也不反對 |   7 |  0.45 |    0.45 |  55.76
    4 |         不同意 | 625 | 39.99 |   40.48 |  96.24
    5 |     非常不同意 |  58 |  3.71 |    3.76 | 100.00
 <NA> |           <NA> |  19 |  1.22 |    <NA> |   <NA>

str(tscs2023$c15ar)

 Factor w/ 5 levels "1","2","3","4",..: 4 4 2 2 4 4 4 2 4 2 ...
 - attr(*, "labels")= Named num [1:5] 1 2 3 4 5
  ..- attr(*, "names")= chr [1:5] "非常同意" "同意" "不同意也不反對" "不同意" ...
 - attr(*, "label")= chr "C15a.您同不同意下列這些說法?像您這樣的人，對政府的作為沒有任何影響力"

# 2.外在政治效能感二

tscs2023$c15br <- rec(tscs2023$c15b,
                  rec = "1=1[非常同意];
                         2=2[同意];
                         3=3[不同意也不反對];
                         4=4[不同意];
                         5=5[非常不同意];
                         else=NA",
                  as.num = F)

#檢查資料清理後的次數分配與結構

frq(tscs2023$c15br)

C15b.您同不同意下列這些說法?您認為政府不在乎像您這樣的人的想法是什麼 (x) <categorical> 
# total N=1563 valid N=1542 mean=2.83 sd=1.20

Value |          Label |   N | Raw % | Valid % | Cum. %
-------------------------------------------------------
    1 |       非常同意 | 182 | 11.64 |   11.80 |  11.80
    2 |           同意 | 659 | 42.16 |   42.74 |  54.54
    3 | 不同意也不反對 |   6 |  0.38 |    0.39 |  54.93
    4 |         不同意 | 631 | 40.37 |   40.92 |  95.85
    5 |     非常不同意 |  64 |  4.09 |    4.15 | 100.00
 <NA> |           <NA> |  21 |  1.34 |    <NA> |   <NA>

str(tscs2023$c15br)

 Factor w/ 5 levels "1","2","3","4",..: 2 4 2 4 4 2 4 2 2 4 ...
 - attr(*, "labels")= Named num [1:5] 1 2 3 4 5
  ..- attr(*, "names")= chr [1:5] "非常同意" "同意" "不同意也不反對" "不同意" ...
 - attr(*, "label")= chr "C15b.您同不同意下列這些說法?您認為政府不在乎像您這樣的人的想法是什麼"

4.資訊接收頻率資料清理與編碼

# A3 資訊接收頻率重新編碼
 
tscs2023$c19r <- rec(tscs2023$c19,
                 rec = "1=1[一天好幾次];
                        2=2[每天一次];
                        3=3[每週五到六天];
                        4=4[每周三到四天];
                        5=5[每週一到兩天];
                        6=6[每週不到一天];
                        7=7[從來沒有];
                        else=NA",
                 as.num = F)

#檢查資料清理後的次數分配與結構

frq(tscs2023$c19r)

C19.您常不常經由電視、報紙、廣播或網路得到政治新聞與訊息? (x) <categorical> 
# total N=1563 valid N=1563 mean=2.44 sd=1.70

Value |        Label |   N | Raw % | Valid % | Cum. %
-----------------------------------------------------
    1 |   一天好幾次 | 613 | 39.22 |   39.22 |  39.22
    2 |     每天一次 | 470 | 30.07 |   30.07 |  69.29
    3 | 每週五到六天 |  82 |  5.25 |    5.25 |  74.54
    4 | 每周三到四天 | 134 |  8.57 |    8.57 |  83.11
    5 | 每週一到兩天 | 147 |  9.40 |    9.40 |  92.51
    6 | 每週不到一天 |  71 |  4.54 |    4.54 |  97.06
    7 |     從來沒有 |  46 |  2.94 |    2.94 | 100.00
 <NA> |         <NA> |   0 |  0.00 |    <NA> |   <NA>

str(tscs2023$c19r)

 Factor w/ 7 levels "1","2","3","4",..: 5 4 1 1 4 4 1 2 3 1 ...
 - attr(*, "labels")= Named num [1:7] 1 2 3 4 5 6 7
  ..- attr(*, "names")= chr [1:7] "一天好幾次" "每天一次" "每週五到六天" "每周三到四天" ...
 - attr(*, "label")= chr "C19.您常不常經由電視、報紙、廣播或網路得到政治新聞與訊息?"

5.社會議題討論頻率資料清理與編碼

# A4 社會議題討論頻率重新編碼

tscs2023$g3r <- rec(tscs2023$g3,
                rec = "1=1[常常];
                       2=2[有時候];
                       3=3[很少];
                       4=4[幾乎沒有];
                       else=NA",
                as.num = F)

#檢查資料清理後的次數分配與結構

frq(tscs2023$g3r)

G3.您過去一年來常不常跟人(認識或不認識的人都算)談論社會上發生的事情(包括政治、經濟、社會各方面)? (x) <categorical> 
# total N=1563 valid N=1563 mean=2.67 sd=0.84

Value |    Label |   N | Raw % | Valid % | Cum. %
-------------------------------------------------
    1 |     常常 | 106 |  6.78 |    6.78 |   6.78
    2 |   有時候 | 574 | 36.72 |   36.72 |  43.51
    3 |     很少 | 608 | 38.90 |   38.90 |  82.41
    4 | 幾乎沒有 | 275 | 17.59 |   17.59 | 100.00
 <NA> |     <NA> |   0 |  0.00 |    <NA> |   <NA>

str(tscs2023$g3r)

 Factor w/ 4 levels "1","2","3","4": 2 3 2 2 2 2 3 3 2 1 ...
 - attr(*, "labels")= Named num [1:4] 1 2 3 4
  ..- attr(*, "names")= chr [1:4] "常常" "有時候" "很少" "幾乎沒有"
 - attr(*, "label")= chr "G3.您過去一年來常不常跟人(認識或不認識的人都算)談論社會上發生的事情(包括政治、經濟、社會各方面)?"

6.社區組織參與情況資料清理與編碼

# A5 社區組織參與資料重新編碼

tscs2023$g5r <- rec(tscs2023$g5,
                rec = "1=1[沒有社區組織];
                       2=2[沒有參加過];
                       3=3[很少參加];
                       4=4[有時會參加];
                       5=5[經常參加];
                       else=NA",
                as.num = F)

#檢查資料清理後的次數分配與結構

frq(tscs2023$g5r)

G5.您有沒有參加住家附近的社區組織? (x) <categorical> 
# total N=1563 valid N=1552 mean=2.44 sd=0.97

Value |        Label |    N | Raw % | Valid % | Cum. %
------------------------------------------------------
    1 | 沒有社區組織 |  105 |  6.72 |    6.77 |   6.77
    2 |   沒有參加過 | 1007 | 64.43 |   64.88 |  71.65
    3 |     很少參加 |  179 | 11.45 |   11.53 |  83.18
    4 |   有時會參加 |  173 | 11.07 |   11.15 |  94.33
    5 |     經常參加 |   88 |  5.63 |    5.67 | 100.00
 <NA> |         <NA> |   11 |  0.70 |    <NA> |   <NA>

str(tscs2023$g5r)

 Factor w/ 5 levels "1","2","3","4",..: 2 4 3 2 2 5 2 2 2 1 ...
 - attr(*, "labels")= Named num [1:5] 1 2 3 4 5
  ..- attr(*, "names")= chr [1:5] "沒有社區組織" "沒有參加過" "很少參加" "有時會參加" ...
 - attr(*, "label")= chr "G5.您有沒有參加住家附近的社區組織?"

7.存檔

#儲存完成資料清理與重新編碼後的資料檔

save(tscs2023,
     file = "tscs2023r.rda",
     compress = T)

六、變數間可能存在之關聯假設

1.教育程度&資訊接收頻率

我認為教育程度與資訊接收頻率之間存在關聯，原因是，部分的政治新聞往往會涉及政府組織、法律制度和公共政策制定的過程的報導，民眾可能需要具備一定程度的背景知識才能理解新聞內容與爭議點，所以不同教育程度的民眾可能因背景知識與資訊理解成本的差異，在民眾認為理解政治新聞需要投入較多時間與精力時，可能降低其持續接觸相關資訊的意願。因此我假設教育程度為學士、碩士、博士的受訪者，與「每天一次」、「一天好幾次」、「一星期五到六次」接收政治新聞之間可能存在關聯，而教育程度為國小、國中、高中的受訪者則會跟「從來沒有」、「每星期一到兩天」、「每星期不到一天」可能存在關聯。

2.資訊接收頻率&社會議題討論頻率

而資訊接收頻率&社會議題討論頻率方面的關聯，我認為民眾日常與他人討論的內容，部分可能來自電視、報紙、廣播或網路所接收到的新聞資訊。當民眾經常接收政治新聞時，便可能會有較多機會接觸不同的政治與公共議題，而這些資訊也可能成為日常談話的內容。因此接收政治新聞較為頻繁的民眾，可能因經常接觸相關議題，而有更多機會在日常生活中與他人討論社會議題。相對而言，較少接收政治新聞的民眾，可能因接觸相關資訊的頻率較低，使公共議題較少成為日常談話的內容。因此我的假設是一天好幾次」或「每天一次」接收政治新聞，和回答「常常」或「有時候」與他人討論社會議題可能存在關聯，而「每星期不到一天」或「從來沒有」接收政治新聞與「很少」或「幾乎沒有」與他人討論社會議題可能存在關聯。

3.社會議題討論頻率&社區組織參與

社會議題討論頻率和社區組織參與的部分，我的推論是參與社區組織活動可能會增進民眾與其他社區成員接觸與交流的機會，例如，民眾可能於社區參與的過程中，接觸關於交通、環境、公共設施等相關議題，並與社區稱援交換意見、需求與尋找折衷解決方式，所以我認為經常參與社區組織活動的民眾，可能會因為具有較多與他人交換意見的機會，因而有了較高社會議題討論的頻率，因此我推測在社區組織參與情況中「有時會參加」或「經常參加」，與「常常」或「有時候」與他人討論社會議題可能存在關聯，而「沒有參加過」社區組織活動和「很少」或「幾乎沒有」與他人討論社會議題可能存在關聯。