বিষয়বস্তুতে চলুন

সামাজিক বিজ্ঞান গবেষণা/জলবায়ু পরিবর্তনের কারণ হিসেবে মানুষের কার্যকলাপ

পূর্ববর্তী পাতা
ধর্মের পরিসংখ্যান
সমাজবিজ্ঞান গবেষণা পরবর্তী পাতা
শহরে সুস্থতা
জলবায়ু পরিবর্তনের কারণ হিসেবে মানুষের কার্যকলাপ

https://pmc.ncbi.nlm.nih.gov/articles/PMC11445540 উৎসটি, যার শিরোনাম "দ্য ইন্টারন্যাশনাল ক্লাইমেট সাইকোলজি কোলাবোরেশন: ক্লাইমেট চেঞ্জ-রিলেটেড ডেটা কালেক্টেড ফ্রম ৬৩ কান্ট্রিজ", জলবায়ু পরিবর্তনের মনোবিজ্ঞানের ওপর একটি আন্তর্জাতিক গবেষণার বর্ণনা দেয়। এতে ৬৩টি দেশের ৫৯,৫০৮ জন অংশগ্রহণকারী জড়িত ছিলেন। ২০২২ সালের জুলাই থেকে ২০২৩ সালের জুলাইয়ের মধ্যে পরিচালিত এই গবেষণাটি জলবায়ু পরিবর্তনের মনোবিজ্ঞানকে আরও ভালোভাবে বোঝার প্রয়োজনীয়তা নিয়ে আলোচনা করে। এর মধ্যে মানুষের বিভিন্ন বিশ্বাস, জলবায়ু নীতির প্রতি তাদের সমর্থন এবং বিভিন্ন দেশে ব্যক্তিগত পর্যায়ে কাজ করার সদিচ্ছার বিষয়গুলো অন্তর্ভুক্ত রয়েছে। এটি বহুনির্বাচনি প্রশ্নমালা পূরণের মাধ্যমে অংশগ্রহণকারীদের নিয়ে গঠিত হয়েছিল।

অংশগ্রহণকারীদের প্রতিক্রিয়া সম্বলিত ডেটাসেটটি ওএসএফ (OSF) থেকে এখানে ডাউনলোড করা যেতে পারে: https://osf.io/ytf89/files/osfstorage।

উত্তরদাতাদের প্রদানকৃত প্রশ্নমালা থেকে এই প্রতিবেদনে যে চলকগুলো (variables) পরীক্ষা করা হবে, সেগুলো হলো: "age" (বয়স), education (Education.2 যার মানগুলো হলো প্রাথমিক, মাধ্যমিক, উচ্চশিক্ষা, ডক্টরেট/মাস্টার্স, কোনো উত্তর নেই), political orientation (Politics2_1 যার মান ০ থেকে ১০০ এর মধ্যে, যেখানে উচ্চ মান ডানপন্থী, নিম্ন মান বামপন্থী এবং মাঝারি মান মধ্যপন্থী নির্দেশ করে) এবং এই প্রশ্নটির উত্তর: "আপনার মতে এই বিবৃতিটি কতটা সঠিক? "মানুষের কার্যকলাপ জলবায়ু পরিবর্তনের কারণ" (Belief.in.CC_1 যার মান ০ থেকে ১০০ এর মধ্যে)।

শিক্ষা

[সম্পাদনা]

উচ্চশিক্ষিত (স্নাতক ডিগ্রি) অথবা ডক্টরেট/মাস্টার্স ডিগ্রিধারী ব্যক্তিদের মধ্যে মানুষের কার্যকলাপকে জলবায়ু পরিবর্তনের কারণ হিসেবে বিশ্বাস করার প্রবণতা বেশি। তবে, নমুনার ৪.৬৬% স্নাতক এবং ৪.১৩% ডক্টরেটধারী এটি বিশ্বাস করেন না!

#Loading data and libraries
library(dplyr)
data_notimers <- read.csv("data_notimers.csv")

data_notimers$Education.2 <- factor(data_notimers$Education.2, levels = c(1,2,3,4,5), labels = c("Primary","Secondary","Tertiary","Doctorate/Master's","No answer"))

df <- data_notimers[-which(is.na(data_notimers$Education.2)),]

df %>%
    group_by(Education.2) %>%
    summarise(media=mean(Belief.in.CC_1, na.rm=TRUE)) %>%
    arrange(desc(average))


Education.2        media
1 Terziaria         79.0
2 Dottorato/Master  78.5
3 Primaria          78.3
4 Secondaria        76.0
5 No risposta       71.3


df2<-data_notimers %>%
filter(Education.2=="Tertiary")

out<-boxplot(df2$Belief.in.CC_1, plot = FALSE)$out
round(length(out)*100/nrow(df2),2)
[1] 4.66

রাজনৈতিক মতাদর্শ

[সম্পাদনা]

বামপন্থীদের মধ্যে মানুষের কার্যকলাপকে জলবায়ু পরিবর্তনের কারণ হিসেবে বিশ্বাস করার প্রবণতা বেশি, তবে নমুনার ৭.৩% এটি বিশ্বাস করেন না, এবং এর পাশাপাশি ৪.২৯% ডানপন্থীও এটি বিশ্বাস করেন না!

politics <- rep(NA,nrow(data_notimers))
politics[data_notimers$Politics2_1>=70] <-"Right"
politics[data_notimers$Politics2_1>35 & data_notimers$Politics2_1<70] <-"Center"
politics[data_notimers$Politics2_1<=35] <-"Left"

data_notimers$politics <- politics

df <- data_notimers[-which(is.na(data_notimers$policy)),]

df %>%
    group_by(policy) %>%
    summarise(media=mean(Belief.in.CC_1, na.rm=TRUE)) %>%
    arrange(desc(average))
media politics
1 Left 85.2
2 Center 75.7
3 Right 75.1
df2<-data_notimers %>%
filter(politics=="Left")

out<-boxplot(df2$Belief.in.CC_1, plot = FALSE)$out
round(length(out)*100/nrow(df2),2)
[1] 7.3

বয়স বাড়ার সাথে সাথে, মানুষের কার্যকলাপের ফলে জলবায়ু পরিবর্তন ঘটছে—এমনটা বিশ্বাস করা উত্তরদাতার সংখ্যা হ্রাস পায়।

age_group <- rep(NA,nrow(data_notimers))
age_group[data_notimers$Age>=51] <-"High Age"
age_group[data_notimers$Age>25 & data_notimers$Age<51] <-"Medium Age"
age_group[data_notimers$Age<=25] <-"Low Age"

data_notimers$age_group <- age_group

df <- data_notimers[-which(is.na(data_notimers$age_group)),]

df %>%
    group_by(age_group) %>%
    summarise(media=mean(Belief.in.CC_1, na.rm=TRUE)) %>%
    arrange(desc(media)
age_group media
1 Low Age 82.4
2 Medium Age 78.1
3 High Age 73.5

দেশসমূহের মধ্যে পার্থক্য

[সম্পাদনা]

জলবায়ু পরিবর্তনের জন্য মানুষকে দায়ী করার ক্ষেত্রে এই নমুনায় মার্কিন যুক্তরাষ্ট্রের অবস্থান সবার নিচে।

df %>%
group_by(country) %>%
    summarise(media=mean(Belief.in.CC_1, na.rm=TRUE)) %>%
    arrange(desc(media)
country                media
 1 philippines         92.3
 2 portugal            92.2
 3 tanzania            92.1
 4 ghana               90.4
 5 kenya               89.0
 6 uganda              88.7
 7 turkey              88.2
 8 srilanka            88.1
 9 uruguay             88.1
10 chile               87.9
11 brazil              87.1
12 mexico              86.8
13 gambia              86.5
14 india               86.2
15 china               86.0
16 vietnam             85.1
17 nigeria             85.0
18 italy               84.9
19 peru                84.6
20 ecuador             84.2
21 canada              84.2
22 armenia             83.4
23 czechia             83.3
24 ukraine             83.2
25 southafrica         82.6
26 serbia              82.2
27 romania             82.1
28 venezuela           81.5
29 northmacedonia      81.4
30 southkorea          80.8
31 algeria             80.7
32 spain               80.7
33 ireland             80.5
34 singapore           80.5
35 taiwan              80.0
36 thailand            79.8
37 bulgaria            79.6
38 france              78.9
39 switzerland         78.3
40 morocco             78.2
41 poland              77.9
42 uk                  77.6
43 unitedarabemirates  77.0
44 sudan               76.3
45 russia              76.2
46 greece              76.2
47 slovenia            75.7
48 finland             75.6
49 netherlands         75.6
50 australia           75.2
51 germany             74.8
52 denmark             74.1
53 japan               73.9
54 sweden              73.8
55 newzealand          73.6
56 latvia              73.3
57 austria             73.2
58 slovakia            73.1
59 belgium             72.9
60 israel              72.0
61 norway              71.1
62 usa                 69.6
63 saudiarabia         69.5