likert

问题 In Qualtrics, how do I use Javascript to hide a slider from being displayed until a response is given? thank you! 来源： https://stackoverflow.com/questions/60143050/in-qualtrics-how-do-i-hide-a-slider-from-being-displayed-until-a-response-is-gi

问题 I want to add labels as percentages to the individual bars of my Likert chart. Is there an easy way to do this? I've tried using geom_text, adjusting ordering commands, and enabling "plot.percents = TRUE." None of these things seem to work. My code, data, and current plot below. library(ggplot2) library(reshape) library(likert) library(dplyr) setwd("~/Desktop/") df <- read.csv("Likert_Test.csv") df[2] <- lapply(df[2], as.factor) colnames(df)[2] <- c("cake?") df[2] <- lapply(df[2], factor,

问题 I'm trying to get my code to output the percentage on top of each individual bar. Right now, the percentages shown below are on the wrong side. My code combines Labels 1 and 2 and Labels 3 and 4, and then outputs those numbers on the incorrect sides. Is there a function to label those bars correctly? I'm including my code, the data from the .csv file, and the current visualization. library(ggplot2) library(reshape) library(likert) library(dplyr) setwd("~/Desktop/") df <- read.csv("Likert_Test

问题 I'm trying to get my code to output the percentage on top of each individual bar. Right now, the percentages shown below are on the wrong side. My code combines Labels 1 and 2 and Labels 3 and 4, and then outputs those numbers on the incorrect sides. Is there a function to label those bars correctly? I'm including my code, the data from the .csv file, and the current visualization. library(ggplot2) library(reshape) library(likert) library(dplyr) setwd("~/Desktop/") df <- read.csv("Likert_Test

问题 I have a dataframe of scores scores <- data.frame(var1=c(1,3,5,6,1,4,10,2,5,3,7), var2=c(10,9,1,4,3,3,4,7,8,10,10)) which I transform into a factor with three levels as: library(likert) library(dplyr) scores_factor <- scores %>% sapply(., cut, c(0, 6, 8, 10), include.lowest = TRUE, labels = c("Negative", "Okay", "Positive")) %>% data.frame and then transforming it into a likert item and plotting it using the likert.plot from the "likert" package: likert_scores <- likert(scores_factor) p <-

问题 I set up a large amount of likert and other graphs to evaluate the total results of my questionnaire. Now I would like to do the same thing by a grouping variable "group" I set up all of my likert items and their definitions (my data is in a god-awful format, so I had to reformat it with R). The idea for the code is the following: 1. group and rename the questions according to the likert () functions needs 2. have R split the dataframe according to 11 groups 3. plot a likert graph for each of

问题 I set up a large amount of likert and other graphs to evaluate the total results of my questionnaire. Now I would like to do the same thing by a grouping variable "group" I set up all of my likert items and their definitions (my data is in a god-awful format, so I had to reformat it with R). The idea for the code is the following: 1. group and rename the questions according to the likert () functions needs 2. have R split the dataframe according to 11 groups 3. plot a likert graph for each of

问题 I use the custom panel function (found here) to display data labels on the graph. require(HH) # also loads: lattice, grid, latticeExtra # custom panel function myPanelFunc <- function(...){ panel.likert(...) vals <- list(...) DF <- data.frame(x=vals$x, y=vals$y, groups=vals$groups) ### some convoluted calculations here... grps <- as.character(DF$groups) for(i in 1:length(origNames)){ grps <- sub(paste0('^',origNames[i]),i,grps) } DF <- DF[order(DF$y,grps),] DF$correctX <- ave(DF$x,DF$y,FUN