From 0b150141813fa02e85a7748275b74b75d016f20a Mon Sep 17 00:00:00 2001 From: rehughes07 <58590776+rehughes07@users.noreply.github.com> Date: Fri, 22 Oct 2021 14:24:57 +0100 Subject: [PATCH] Data figuring Making Q3 into its own file in order to see how that helps with making charts and graphs. TEST --- .Rapp.history | 0 Connect Project R Markdown.Rmd | 4 ++ data/.Rhistory | 64 +++++++++++++++++++++++++ data/Q3.csv | 86 ++++++++++++++++++++++++++++++++++ 4 files changed, 154 insertions(+) create mode 100644 .Rapp.history create mode 100644 data/.Rhistory create mode 100644 data/Q3.csv diff --git a/.Rapp.history b/.Rapp.history new file mode 100644 index 0000000..e69de29 diff --git a/Connect Project R Markdown.Rmd b/Connect Project R Markdown.Rmd index d9a1c22..fe41289 100644 --- a/Connect Project R Markdown.Rmd +++ b/Connect Project R Markdown.Rmd @@ -66,8 +66,12 @@ pie(Q26_freq) #very messy as a pie chart - split by type? Or is it important to see crossover ```{r Q3 bar/pie} + +Q3_data <- read.csv("Q3.csv") + ``` + pie(Q3_freq) #also not optimal as pie...perhaps bar diff --git a/data/.Rhistory b/data/.Rhistory new file mode 100644 index 0000000..efd3b4e --- /dev/null +++ b/data/.Rhistory @@ -0,0 +1,64 @@ +connect_data = read.csv("connectDATA.csv") +connect_data = read.csv("connectDATA.csv") +head(connect_data) +View(connect_data) +table(connect_data$Q25) +Q25_frequencies = table(connect_data$Q25) +Q25_frequencies = table(connect_data$Q25) +Q26_freq = table(connect_data$Q26) +Q25_frequencies = table(connect_data$Q25) +Q26_freq = table(connect_data$Q26) +Q26_freq +connect_data = read.csv("connectDATA.csv") +head(connect_data) +connect_data = read.csv("connectDATA.csv") +connect_data = read.csv("connectDATA.csv") +view(connect_data) +View(connect_data) +Q25_frequencies = table(connect_data$Q25) +Q26_freq = table(connect_data$Q26) +Q26_freq +Q25_frequencies = table(connect_data$Q25) +Q_25_frequencies +Q26_freq = table(connect_data$Q26) +Q26_freq +Q25_frequencies = table(connect_data$Q25) +Q_25frequencies +Q26_freq = table(connect_data$Q26) +Q26_freq +Q_25frequencies +Q25_frequencies = table(connect_data$Q25) +Q25_25frequencies +Q25_frequencies +test3 = as.factor(connect_data$Q3, levels = c(1, 2, 3, 4, 5), labels = c("Worldviews", "Religion", "Theology", "Ethics", "Philosophy")) +pie(connect_data$Q25, labels = names(connect_data$Q25)) +pie(Q25_frequencies, labels = names(connect_data$Q25)) +pie(Q25_frequencies, labels = names(c("maybe", "yes", "no"))) +pie(Q25_frequencies, labels = names(connect_data$Q25)) +names(Q25_frequencies = c("Maybe", "No", "Yes")) +pie(Q25_frequencies, labels = c("Maybe", "No", "Yes")) +pie(Q26_freq) +Q25_frequencies = table(connect_data$Q25) +Q25_frequencies +Q26_freq = table(connect_data$Q26) +Q26_freq +Q3_freq = table(connect_data$Q3) +Q25_frequencies = table(connect_data$Q25) +Q25_frequencies +Q26_freq = table(connect_data$Q26) +Q26_freq +Q3_freq = table(connect_data$Q3) +Q3_freq +pie(Q3_freq) +knitr::opts_chunk$set(echo = TRUE) +pie(Q25_frequencies, labels = c("Maybe", "No", "Yes")) +cor(Q_20, Q_22, data=connect_data) +cor(connect_data$Q_20, connect_dataQ_22) +cor(connect_data$Q_20, connect_data$Q_22) +Q3_data <- read.csv("Q3.csv") +setwd("~/Documents/GitHub/re_connect_survey/data") +Q3_data <- read.csv("Q3.csv") +read.csv("Q3.csv) +data=read.csv("Q3.csv) +Q3_data <- read.csv("Q3.csv") +Q3_data <- read.csv("Q3.csv") diff --git a/data/Q3.csv b/data/Q3.csv new file mode 100644 index 0000000..a569f92 --- /dev/null +++ b/data/Q3.csv @@ -0,0 +1,86 @@ +Q3,Participant,Worldviews,Religion,Theology,Ethics,Philosophy +"2,3,4,5",1,FALSE,TRUE,TRUE,TRUE,TRUE +"1,2,3,4,5",2,TRUE,TRUE,TRUE,TRUE,TRUE +"1,2,3,4,5",3,TRUE,TRUE,TRUE,TRUE,TRUE +"2,5",4,FALSE,TRUE,FALSE,FALSE,TRUE +"1,2,3,4,5",5,TRUE,TRUE,TRUE,TRUE,TRUE +"1,2,3,5",6,TRUE,TRUE,TRUE,FALSE,TRUE +"1,2,3,4,5",7,TRUE,TRUE,TRUE,TRUE,TRUE +"2,3,4,5",8,FALSE,TRUE,TRUE,TRUE,TRUE +"1,2,3,4,5",9,TRUE,TRUE,TRUE,TRUE,TRUE +"1,2,3,4,5",10,TRUE,TRUE,TRUE,TRUE,TRUE +"1,2,3,5",11,TRUE,TRUE,TRUE,FALSE,TRUE +"1,2,3,4,5",12,TRUE,TRUE,TRUE,TRUE,TRUE +"1,2,3,4,5",13,TRUE,TRUE,TRUE,TRUE,TRUE +"2,4,5",14,FALSE,TRUE,FALSE,TRUE,TRUE +"1,2,3,4,5",15,TRUE,TRUE,TRUE,TRUE,TRUE +2,16,FALSE,TRUE,FALSE,FALSE,FALSE +"1,2,3,4,5",17,TRUE,TRUE,TRUE,TRUE,TRUE +"1,2,4,5",18,TRUE,TRUE,FALSE,TRUE,TRUE +2,19,FALSE,TRUE,FALSE,FALSE,FALSE +"1,2,3,4,5",20,TRUE,TRUE,TRUE,TRUE,TRUE +"1,2,3,4,5",21,TRUE,TRUE,TRUE,TRUE,TRUE +"1,2,3,4,5",22,TRUE,TRUE,TRUE,TRUE,TRUE +"2,3,4,5",23,FALSE,TRUE,TRUE,TRUE,TRUE +"1,2,3,4,5",24,TRUE,TRUE,TRUE,TRUE,TRUE +"1,2,3,4,5",25,TRUE,TRUE,TRUE,TRUE,TRUE +2,26,FALSE,TRUE,FALSE,FALSE,FALSE +"1,2",27,TRUE,TRUE,FALSE,FALSE,FALSE +"1,2",28,TRUE,TRUE,FALSE,FALSE,FALSE +"1,2",29,TRUE,TRUE,FALSE,FALSE,FALSE +"1,2,3,4,5",30,TRUE,TRUE,TRUE,TRUE,TRUE +2,31,FALSE,TRUE,FALSE,FALSE,FALSE +"1,2,3,4,5",32,TRUE,TRUE,TRUE,TRUE,TRUE +"1,2,3,4",33,TRUE,TRUE,TRUE,TRUE,FALSE +"1,2,3,4,5",34,TRUE,TRUE,TRUE,TRUE,TRUE +"1,2,3,4,5",35,TRUE,TRUE,TRUE,TRUE,TRUE +"1,2",36,TRUE,TRUE,FALSE,FALSE,FALSE +"1,2,3,4,5",37,TRUE,TRUE,TRUE,TRUE,TRUE +"1,2,3,4,5",38,TRUE,TRUE,TRUE,TRUE,TRUE +"2,3,5",39,FALSE,TRUE,TRUE,FALSE,TRUE +"1,2,3,4,5",40,TRUE,TRUE,TRUE,TRUE,TRUE +2,41,FALSE,TRUE,FALSE,FALSE,FALSE +2,42,FALSE,TRUE,FALSE,FALSE,FALSE +2,43,FALSE,TRUE,FALSE,FALSE,FALSE +"1,2",44,TRUE,TRUE,FALSE,FALSE,FALSE +"1,2,3,4,5",45,TRUE,TRUE,TRUE,TRUE,TRUE +"1,2,3,4,5",46,TRUE,TRUE,TRUE,TRUE,TRUE +"1,2,3,4,5",47,TRUE,TRUE,TRUE,TRUE,TRUE +2,48,FALSE,TRUE,FALSE,FALSE,FALSE +2,49,FALSE,TRUE,FALSE,FALSE,FALSE +2,50,FALSE,TRUE,FALSE,FALSE,FALSE +"1,2",51,TRUE,TRUE,FALSE,FALSE,FALSE +2,52,FALSE,TRUE,FALSE,FALSE,FALSE +"2,4,5",53,FALSE,TRUE,FALSE,TRUE,TRUE +"1,2,4,5",54,TRUE,TRUE,FALSE,TRUE,TRUE +"2,3,4,5",55,FALSE,TRUE,TRUE,TRUE,TRUE +"1,2,3",56,TRUE,TRUE,TRUE,FALSE,FALSE +2,57,FALSE,TRUE,FALSE,FALSE,FALSE +"1,2,3,5",58,TRUE,TRUE,TRUE,FALSE,TRUE +"1,2,3,4,5",59,TRUE,TRUE,TRUE,TRUE,TRUE +2,60,FALSE,TRUE,FALSE,FALSE,FALSE +"2,3,4,5",61,FALSE,TRUE,TRUE,TRUE,TRUE +"1,2",62,TRUE,TRUE,FALSE,FALSE,FALSE +"1,2,3,4,5",63,TRUE,TRUE,TRUE,TRUE,TRUE +"1,2,3,4,5",64,TRUE,TRUE,TRUE,TRUE,TRUE +"2,3,4,5",65,FALSE,TRUE,TRUE,TRUE,TRUE +"1,2",66,TRUE,TRUE,FALSE,FALSE,FALSE +"1,2",67,TRUE,TRUE,FALSE,FALSE,FALSE +4,68,FALSE,FALSE,FALSE,TRUE,FALSE +"1,2,3,4,5",69,TRUE,TRUE,TRUE,TRUE,TRUE +2,70,FALSE,TRUE,FALSE,FALSE,FALSE +"1,2,4,5",71,TRUE,TRUE,FALSE,TRUE,TRUE +"1,2",72,TRUE,TRUE,FALSE,FALSE,FALSE +"1,2",73,TRUE,TRUE,FALSE,FALSE,FALSE +"1,2",74,TRUE,TRUE,FALSE,FALSE,FALSE +2,75,FALSE,TRUE,FALSE,FALSE,FALSE +"2,3,4,5",76,FALSE,TRUE,TRUE,TRUE,TRUE +"1,2",77,TRUE,TRUE,FALSE,FALSE,FALSE +2,78,FALSE,TRUE,FALSE,FALSE,FALSE +2,79,FALSE,TRUE,FALSE,FALSE,FALSE +2,80,FALSE,TRUE,FALSE,FALSE,FALSE +"1,2,4",81,TRUE,TRUE,FALSE,TRUE,FALSE +"1,5",82,TRUE,FALSE,FALSE,FALSE,TRUE +"1,2",83,TRUE,TRUE,FALSE,FALSE,FALSE +"1,2,4,5",84,TRUE,TRUE,FALSE,TRUE,TRUE +2,85,FALSE,TRUE,FALSE,FALSE,FALSE \ No newline at end of file