hw1

Quarto

Quarto enables you to weave together content and executable code into a finished document. To learn more about Quarto see https://quarto.org.

Running Code

When you click the Render button a document will be generated that includes both content and the output of embedded code. You can embed code like this:

library(readxl)

data <- read_excel("C:/R4surveyresearch-master/民主實驗室2025TikTok使用者調查/民主實驗室TikTok使用者網路調查_譯碼簿0326.xlsx")

head(data)

# A tibble: 6 × 2
  題號           題目                                           
  <chr>          <chr>                                          
1 編號           <無>                                           
2 抖音活躍使用者 抖音活躍使用者                                 
3 S0             S0.請問您的西元出生年次？                      
4 S0_AGE         S0.請問您的年齡                                
5 S1             S1.請問您最近一年有多常使用TikTok抖音？        
6 S2             S2.請問您平常單次使用TikTok抖音大概的時間長度？

#研究問題
#本研究旨在探討TikTok的使用頻率是否會影響使用者的政治態度。
#特別關注:使用TikTok的頻率是否與受訪者在兩岸關係立場、政治興趣與政黨認同上存在顯著關聯。

#具體研究問題

#RQ: Does the frequency of TikTok usage influence individuals’ political attitudes toward cross-strait relations and domestic politics?

#變數選擇說明

#在本研究中，我選擇「TikTok使用頻率」作為自變項，因為其能反映受訪者接觸中國資訊的程度。依變項為「政治立場」與「兩岸態度」，這兩者可代表受訪者對政治議題的傾向。此外，原始問卷中也有其他變數如「年齡」、「教育程度｣、「政治關心程度」等，這些變數亦可能影響受訪者的政治態度。未來分析時將考慮將這些作為控制變因。


#資料來源與描述

#本研究使用資料為 《民主實驗室 2025 TikTok 使用者調查》，
#由「民主實驗室」（Democracy Lab）於 2025 年 3 月 10 日至 3 月 20 日 期間進行的線上問卷調查。

#變項操作化

#類別 變項名稱 測量方式 說明
#依變項 (DV) 對兩岸關係與政治的看法 5 點量表（1=非常傾向統一～5=非常傾向獨立） 作為政治態度的主要衡量指標
#自變項 (IV) TikTok 使用頻率 5 點量表（1=幾乎每天～5=從不使用） 衡量受訪者對 TikTok 的使用強度
#控制變項 (CV) 政治關心程度、教育程度、年齡 5 點或類別量表 控制個人特質與政治涉入程度

#預期假設

 #• H1: TikTok使用頻率越高者，越傾向政治冷感或中間立場。
 #• H2: 對政治較不關心者，其 TikTok使用頻率與政治態度的關聯更顯著。
 #• H3: 年輕族群在 TikTok使用與政治立場間的關聯強度高於中老年族群。

tmp <- "C:/Temp"
if (!dir.exists(tmp)) dir.create(tmp)
Sys.setenv(TEMP = tmp, TMP = tmp)

You can add options to executable code like this

[1] 4

The echo: false option disables the printing of code (only output is displayed).