mirror of
https://github.com/kidwellj/re_connect_survey.git
synced 2024-10-31 15:32:20 +00:00
0b15014181
Making Q3 into its own file in order to see how that helps with making charts and graphs. TEST
65 lines
2.1 KiB
R
65 lines
2.1 KiB
R
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")
|