在ggplot aes中使用闪亮的输入值
是指在数据可视化中，使用一个变量或表达式来定义图形的属性映射。ggplot是一个用于绘制统计图形的R语言包，aes函数用于指定图形的属性映射。
在ggplot aes中使用闪亮的输入值的步骤如下：
- 首先，使用ggplot函数创建一个基础图形对象。
- 然后，使用aes函数来定义图形的属性映射。在aes函数中，可以使用变量名或表达式作为输入值。
- 最后，将数据集传递给ggplot函数，并使用其他图形层函数（如geom_point、geom_line等）来添加具体的图形。
使用闪亮的输入值可以使图形更具有交互性和动态性。例如，可以根据数据的某个属性来调整点的颜色、大小或形状，从而更好地展示数据的特征。
以下是一个示例代码，展示如何在ggplot aes中使用闪亮的输入值来定义点的颜色映射：
library(ggplot2)
# 创建基础图形对象
p <- ggplot(data = iris)
# 定义属性映射
p <- p + aes(x = Sepal.Length, y = Sepal.Width, color = Species)
# 添加点图层
p <- p + geom_point()
# 显示图形
print(p)在这个例子中，我们使用iris数据集，将花萼长度（Sepal.Length）作为x轴，花萼宽度（Sepal.Width）作为y轴，花的种类（Species）作为点的颜色映射。通过这种方式，我们可以根据花的种类来区分不同的点。
推荐的腾讯云相关产品和产品介绍链接地址：
- 腾讯云计算服务：https://cloud.tencent.com/product
- 腾讯云数据库：https://cloud.tencent.com/product/cdb
- 腾讯云服务器：https://cloud.tencent.com/product/cvm
- 腾讯云人工智能：https://cloud.tencent.com/product/ai
- 腾讯云物联网：https://cloud.tencent.com/product/iot
- 腾讯云移动开发：https://cloud.tencent.com/product/mobdev
- 腾讯云存储：https://cloud.tencent.com/product/cos
- 腾讯云区块链：https://cloud.tencent.com/product/baas
- 腾讯云元宇宙：https://cloud.tencent.com/product/mu
相关·内容
我正在编写一个闪亮的应用程序，并使用ggplot来绘制密度图。不幸的是，我无法让ggplot理解aes()部分中的输入变量。下面是我的服务器中有问题的代码的一部分。R：
output$mapPlot <- renderPlot({
ggplot(data=Robbery,aes(x=X.Coordinate.Code,y=Y.Coordinate.Code),environment = .e) +
stat_density2d(aes(fill=..density..,alpha=cut(..density..,breaks=c(0,input$ranged,I
浏览 4提问于2018-01-31得票数 2
回答已采纳
我有个问题。我想在Rmarkdown文档中并排放置两个情节：
```{r, echo = FALSE}
图书馆(Ggplot2)
图书馆(闪亮)
```{r, echo = FALSE,fig.show='hold', out.width='50%'}
(mtcar，aes(qsec，mpg)) +
geom_point()
(mtcar，aes(disp，mpg)) +
geom_point()
而且效果很好。但是，另外，我想添加一个闪亮的小部件，它将与这两个情节相关。这样，情节就不会并排出现。
```{r, echo = FALSE, fig.show=
浏览 2提问于2015-09-18得票数 3
回答已采纳
我正在尝试制作一个闪亮的应用程序，它使用这个功能(在R标记中制造)：
ls_vs <- function(variable) {
dataset %>%
filter({{variable}} != 254.948530) %>%
filter({{variable}} != 121.738080) %>%
ggplot(mapping = aes(y = life_satisfaction, x = {{variable}})) +
geom_point(aes(color = region, shape = freedom_status), siz
浏览 7提问于2021-12-13得票数 1
回答已采纳
1回答
凸包闪闪发光的of图视觉
、、、
我想为用户提供的任何数字变量创建凸包的ggplot，同时允许船体为所选的分类输入变量分裂成几个外壳。
在闪亮的环境中，用户可以选择任意数量的x变量。
library(datasets)
library(ggplot2)
library(ggpubr)
df<- iris
str(df)
b <- ggplot(df, aes(x = Sepal.Length+Sepal.Width, y = Petal.Width))
# Convex hull of groups
b + geom_point(aes(color = Species, shape = Species))
浏览 7提问于2021-12-05得票数 1
回答已采纳
1回答
我有一个动画情节，通过一个R(而不是一个闪亮的应用程序)脚本正确地显示：
load("HF.RData") # this contains the dataframe dt1.HF
p <- ggplot(dt1.HF, aes(x = tm, y = HF, colour = team)) +
geom_point(aes(frame = sn, ids = tm), size = 5)
p <- ggplotly(p)
animation_opts(p, frame = 1000, transition = 500, easing = "lin
浏览 1提问于2018-11-15得票数 0
回答已采纳
在下面这个闪亮的应用程序中，我想在dt中使用来自reactive的dataframe renderPlot。
我尝试了不同的方法：ggplot(dt, aes(x, y)) + geom_point()和ggplot(data(), aes(x, y)) + geom_point()
我只是不知道如何将数据从一个反应性部分传输到另一个反应部分。
编辑
我认为我通过使用：ggplot(data()$dt, aes(x,y) + ...找到了解决方案，但是现在问题似乎出现在来自dplyr包的filter中。
有小费吗？
服务器：
# server
library(dplyr)
library(s
浏览 1提问于2015-08-04得票数 0
回答已采纳
我需要在一个闪亮的Flexdashboard中构建一个复合图片，以便在背景图像上放置一个Ggplot2图表。
我使用以下代码：
```{r}
renderImage({
bkgDom <- image_read('background.png')
myChart <- ggplot(data=individualObs，aes(个人化aes$SA))+ geom_histogram()
图<- image_graph(宽度= 600，高度= 550)
myChart
dev.off()
image_composite(bkgDom，图，偏移= "+10
浏览 7提问于2021-12-19得票数 0
回答已采纳
我试着创建了一个闪亮的应用程序，你可以根据“selectizeInput”来选择ggplot的x轴。
我知道，这是通过预先选择所需的列来解决的。因为在我的例子中，数据结构有点复杂，当可以动态更改aes()中的x =属性时，我更愿意这样做。
为了更好地理解，我添加了一个最小的工作示例。不幸的是，ggplot使用输入作为值，而不是使用相应的列。
library(shiny)
library(ggplot2)
# Define UI for application that draws a histogram
ui <- shinyUI(fluidPage(
# Applicati
浏览 2提问于2016-07-18得票数 5
回答已采纳
我缺少R语句的一些基本原理，尤其是如何在一个闪亮的应用程序的服务器块中使用它们。我只想为四个情节中的每一个设置一个单选按钮，但我认为我的if语句结构失败了。只有最后一个单选按钮显示了一个情节。我对ifelse()比较熟悉，但我正在脱离另一个闪亮的模板--我可以在这里使用ifelse()吗？此外，在如何将输入数据(data.frame创建和绘图定义)添加到服务器块方面的任何帮助也将受到极大的赞赏--我也遗漏了一些东西。
library(shiny)
library(ggplot2)
x <- seq(1:100)
y <- rnorm(100)
df <- data.fram
浏览 0提问于2018-11-18得票数 0
回答已采纳
我正在使用flexdashboard中的闪亮运行时。
我想在按钮按下(input$updt)时隐藏一个图表，我正在尝试这样做：
---
title: "Students Data - College of Business"
output:
flexdashboard::flex_dashboard:
orientation: columns
runtime: shiny
---
```{r setup, include=FALSE}
库(Flexdashboard)
库(Ggplot2)
库(Shinyjs)
shinyjs::useShinyjs
浏览 2提问于2017-04-14得票数 1
我正在尝试将ggplot对象转换为plotly，并在一个闪亮的应用程序中显示它。但是我遇到了一个错误：“没有适用于'plotly_build‘的方法应用于”NULL“类的对象”
我能够成功地将ggplot对象返回给闪亮的应用程序，
output$plot1 <- renderplot({
gp <- ggplot(data = mtcars, aes(x = disp, y = cyl)) + geom_smooth(method = lm, formula = y~x) + geom_point() + theme_gdocs()
})
但不知何故不能转换它。
我的
浏览 2提问于2016-06-07得票数 20
回答已采纳
1回答
我是新来的R闪亮。实际上，我已经在R代码中使用ggplot绘制了Stacked Barplot。我想用闪亮来画同样的东西。下面是我的R代码： ggplot(data = df, aes(x = OutPut, y = Group, fill = Group)) +
geom_bar(stat = "identity") +
facet_grid(~ Environment) 在我的R代码中，它给出了我试图在shiny中绘制的正确的results.But。下面是我的闪亮的R代码。 ui <- fluidPage(theme = shinytheme("
浏览 9提问于2019-01-22得票数 0
我试着用ggplot (在闪闪发亮的应用程序之外)单独绘制该图形，它绘制得很好，所以我知道问题不在于我的ggplot代码，而在于如何将闪亮的应用程序中的输入输入到renderplot({})部分。输入是轴。
代码：
library(ggplot2)
library(shiny)
data1 <- mtcars
ui <- fluidPage(
sidebarLayout(
sidebarPanel(
selectInput(
inputId = "xaxis",
label = "Choose
浏览 0提问于2018-08-03得票数 2
回答已采纳
2回答
我想把y-var放大，把它乘以一个数字，比如说10。问题是，这是在一个闪亮的应用程序和变量必须作为字符串传递，即input$variable。
如何将aes_string()中的一个变量与aes()中的变量相乘？下面是一个失败的例子：
library(ggplot2)
ggplot(data = subset(mtcars, cyl == 4), aes_string(x = "wt", y = "mpg")) +
geom_line(size = 1.5, color = "#00868B") +
geom_li
浏览 1提问于2018-06-06得票数 1
回答已采纳
1回答
我正在使用flexdashboard在Rmarkdown文件中制作一个闪亮的应用程序，而且我很难用一个反应函数的数据制作一个‘m图。
以下是步骤/要素：
从询问日期的无线电按钮中获取输入，并打印答案(以检查他是否反应良好) ->工作
读取相关csv-文件(基于日期)并打印其内容(以检查) ->工作
用csv-文件->的内容生成的ggplot不起作用。
当我使用renderPlot()来使用一个非反应性数据集(我加载了一个数据集)来生成一个is图时，我得到了正确的结果，所以ggplot部分是很好的。
这与反应性en renderPlot组合有关，但我似乎无法
浏览 2提问于2018-01-15得票数 1
我不知道如何连接滑块中的输入(n)和输出(绘图)。当我移动滑块底部在闪亮的应用程序，情节没有改变。我想知道是否输出和输入没有正确地连接在一起。
库(Ggplot2)库(闪亮)图<-函数( x，y，xlim=c(-3,3)){ x <- seq(-4，4，by=0.01) norm_dens <- d范数(X) t_dens <- dt(x，df = n-1) df = data.frame(x =x，z= norm_dens，t = t_dens) g图(数据= df，aes(x)) + geom_line(aes(y = z，colour = "z")
浏览 5提问于2022-04-02得票数 0
当我用ggplotly()语言为一个闪亮的应用程序做一个facet_grid时，有大量的平面组，情节就会变得一团糟。然而，它正确地工作在外面发亮。
我怎么才能解决这个问题？
我怀疑这与Y标度有关，但我找不到解决办法。
下面是一个基于的可重复的示例。
闪亮输出与非光泽输出的比较：
代码
外面闪闪发亮：
library(ggplot2)
data(diamonds, package = "ggplot2")
# new faceting group
diamonds$rdmGroup <- as.factor(sample(LETTERS, dim(diamon
浏览 3提问于2017-09-26得票数 5
回答已采纳
1回答
如何为闪亮的网页制作箱形图
、、、、
日安 我试图为一个闪亮的网页做一个简单的箱形图，但由于某些原因，它不起作用。我使用下面的代码在markdown中做了这件事，我得到了我想要的结果。 ggplot(test, aes(x = Date, y = test$Var1, group = Date)) +
geom_boxplot() 这是我在markdown中得到的，这也是我想要的闪亮的web页面。 ? 下面的代码是我用来创建闪亮网页的代码 library(readxl)
library(shiny)
library(ggplot2)
library(dplyr)
ui <- fluidPage(
title
浏览 14提问于2020-04-15得票数 0
我正在尝试创建一个闪亮的应用程序，用户可以上传一个.csv文件，然后在该数据文件上应用一个过滤器，然后使用ggplot2绘制一个图。不幸的是，当我试图从一个应该上传的.csv变量中创建一个select输入菜单时，我偶然发现了一个问题。
为了创建一个简单的示例，我们可以将diamonds数据集从ggplot2导出为.csv文件：
write.csv(diamonds, "diamonds.csv")
然后创建一个闪亮的应用程序：
library(shiny)
library(shinyWidgets)
library(ggplot2)
ui <- fluidPage(
浏览 1提问于2019-03-03得票数 0
回答已采纳
1回答
我试图安排多个图表在闪亮的应用程序。我试图绘制两个饼图和一个ggplot2图表。
require(ggplot2)
require(gridExtra)
par(mfrow = c(2,2))
z=data.frame(x=1:10, y=11:20)
pie(z$x,z$y)
pie(z$x,z$y)
ggplot(z, aes(x,y)) + geom_bar(stat="identity", width=.3)
我试过使用grid.arrange，但它只呈现出ggplot图表。我试着用grid.arrange渲染这三幅图，然后它返回错误消息输入必须是grobs
浏览 4提问于2015-02-20得票数 2
回答已采纳
当我运行以下代码时：
graph <- ggplot(data = graphData, aes_string(x = input$variable1, y = input$variable1))
graph <- graph + geom_point( aes_string(colour=input$groupVariable) )
我得到了以下图表：
这是有问题的，因为它不是按不同的颜色分组的，而是用蓝色的颜色分组的。
我想要这个：
我尝试使用factor()，如下所示：
graph <- ggplot(data = graphData, ae
浏览 2提问于2015-12-03得票数 2
回答已采纳
我正试图制作一个闪亮的应用程序，它将允许根据所选的分类变量对散点图的点进行着色。
library(shiny)
data<-data.frame(iris)
ui <- navbarPage("Summary",
tabsetPanel(
tabPanel("Graph", fluid=T,
fluidPage(
sidebarPanel(selectInput(
浏览 6提问于2022-03-24得票数 1
回答已采纳
1回答
由于找不到将变量名传递给flexdashboard的方法，所以我很难使用data.table。
我已经浏览过和所有引用的问题，也包括和许多类似的问题，尝试get、mget、..、eval都没有结果(我也尝试过with = FALSE和with = TRUE )。
可重复的示例和我已经尝试过的位于.Rmd文件中，如下所示：
---
title: "Untitled"
output:
flexdashboard::flex_dashboard:
orientation: columns
vertical_layout: fill
runtime: shin
浏览 1提问于2019-07-24得票数 0
因此，我需要制作一个闪亮的应用程序，它需要一个动态的输入数来最终进行降维，但是当我有一个动态的输入数时，我仍然想弄清楚如何引用我的输入中的内容。我使用的是虹膜数据集，输入是变量。我需要做的部分是用k表示的第二幅图，但我只是试着第一次做一个基本的情节。我到目前为止
library(shiny)
library(ggplot2)
ui <- shinyUI(fluidPage(
titlePanel("Old Faithful Geyser Data"),
fluidRow(
column(2,
textInput(inpu
浏览 1提问于2022-04-17得票数 2
我有下面的闪亮的应用程序，它包括一个数字输入和输出两个ggplot图形。
library(shiny)
n <- 100
dat <- data.frame(var1 = round(rnorm(n, 50, 10),0),
var2 = sample(c("A", "B"), n, replace = TRUE))
# USER INTERFACE
ui <- fluidPage(
titlePanel("My Sample App"),
sidebarLayout(
浏览 4提问于2020-08-15得票数 0
回答已采纳
在我闪亮的应用程序中，我有一个反应性的data.frame。然后将data.frame给出ggplot，并绘制条形图。不过，我想在条形图中设置条形图的确切顺序。这是我能做的
JOIN11$ID_Polymer <- factor(JOIN11$ID_Polymer,
levels=JOIN11$ID_Polymer[order(JOIN11[["Content"]])])
在我的R脚本中(一个在闪亮服务器之外准备数据的function() )。
我想在闪亮的服务器中设置订单，这样用户就可以更改order参数
浏览 0提问于2018-10-04得票数 1
回答已采纳
1回答
我想要绘制一个密度图的数字，保存它，并呈现在闪亮的应用程序。我想动态添加到图形中的是从输入中输入的一行，显示新输入的变量位于密度图中的位置:我将ggplot图形从虹膜数据中保存为：
library(ggplot2)
twoClassIrisSepalLength <- subset(iris[1:100,], select=c("Species","Sepal.Length"))
twoClassIrisSepalLength$Species <- factor(twoClassIrisSepalLength$Species)
g <- g
浏览 3提问于2015-11-26得票数 0
回答已采纳
1回答
我正在开发闪亮的应用程序。我想用提交按钮渲染情节。我还想打印标签，如果用户选中输入复选框。我可以通过按钮渲染情节。但是当选中复选框时，它就不起作用了。
以下是代码：
library(shiny)
library(plotly)
ui <- fluidPage(
actionButton('RUN', 'Run'),
checkboxInput('PrintLab', 'Label', FALSE),
plotlyOutput("plot1")
)
server = function(in
浏览 0提问于2017-09-11得票数 0
回答已采纳
当在闪亮的应用程序中使用ggplotly与plot_ly生成绘图时，绘图的宽度不到一半。为什么会这样呢？有没有办法修复它，使ggplotly生成与plot_ly或ggplot2相同宽度的绘图？我尝试过使用width参数，但没有解决这个问题。
闪亮的应用程序的输出：
library(shiny)
library(plotly)
library(ggplot2)
ui <- fluidPage(
titlePanel("plotly with shiny"),
mainPanel(
h4("Using ggplotly:
浏览 38提问于2017-07-08得票数 3
我在一个闪亮的应用程序中使用rhandsontable手动更新要用ggplot2显示的数据。
当快速地在rhandsontable中添加/更改值时，该表将启动一个无限循环，这将使整个闪亮的应用程序不动。
下面是一个例子。通过快速更改表中的值，应用程序会被卡住。
library(shiny)
library(rhandsontable)
library(ggplot2)
ui <- fluidPage(
rHandsontableOutput("hot"),
plotOutput("plot")
)
server <- function(i
浏览 11提问于2022-07-20得票数 1
回答已采纳
1回答
我正在尝试使用ggplot2为两个(或可能更多)连续值绘制一个漂亮的图。
守则如下：
library("ggplot2")
library("ggthemes") ## for theme_economist
df <- data.frame(origin=c('with','without'),value=c(24536,50456))
pie <- ggplot(df, aes(x = "",y=value, fill = origin))+
geom_bar(width = 1,s
浏览 2提问于2015-07-09得票数 0
回答已采纳
1回答
我使用的是ggplot2，使用的输入如下所示，效果很好：
geom_text(aes(label=n),data=cbind(aggregate(formula(paste0("n ~ " ,
input$yv)) , b,sum), gender = "total") )
但我可以添加第二个闪亮的输入‘输入$xv’，而不是硬编码“性别”(如这不起作用：
geom_text(aes(label=n),data=cbind(aggregate(formula(paste0("n ~ " ,
input$yv)) , b,sum), input$
浏览 0提问于2018-02-11得票数 1
回答已采纳
考虑一下这个闪亮的应用程序：
library(shiny)
library(ggplot2)
ui <- fluidPage(
radioButtons("type", "Type of plot", choices = c("density", "boxplot")),
plotOutput("plot")
)
server <- function(input, output){
output[["plot"]] <- renderPlot({
if(in
浏览 2提问于2019-10-18得票数 7
我用闪亮的小部件编写了非常简单的rmarkdown文档。我想添加内容表，但是尽管我使用toc: yes，但它根本不起作用，为什么？
---
title: "Test document"
author: "XXX"
date: "XXX"
output:
html_document:
toc: yes
runtime: shiny
---
```{r, echo = FALSE}
H2(“R包”)
br()
h3('Ggplot2')
br()
H4(Mtcar)
图书馆(Ggplot2)
数据(Mtcar)
sel
浏览 2提问于2015-09-23得票数 0
回答已采纳
0回答
我有一个闪亮的应用程序，在应用程序中绘制一些ggplot2图。现在，我正在将其制作成一个包，并将绘图导出为函数。我发现，一旦我在RStudio中绘制了一些RStudio，并启动了我闪亮的应用程序，那么我闪亮的应用程序中的所有绘图都会进入ggplot窗格。
我已经将问题追踪到了非常具体的位置，并做了一个最小的工作示例。
这个不错的应用程序绘制了一个ggplot，尽管它首先使用ggsave将ggplot保存为png，然后将ggplot对象返回给renderPlot，以便在应用程序中显示它。
library(shiny)
library(ggplot2)
SAVE_PLOT <- TRUE
u
浏览 4提问于2017-12-08得票数 3
回答已采纳
我正在从柔性仪表板过渡到shinydashboard，这可能比我想象的要简单。
我有这样的布局，我可以很容易地在柔性仪表板。
---
title: "Focal Chart (Left)"
output: flexdashboard::flex_dashboard
---
Column {data-width=600}
-------------------------------------
### Chart 1
```{r}
Column {data-width=400}
-------------------------------
浏览 2提问于2022-01-24得票数 1
我正试图在renderUI中用闪亮的仪表板制作一个酒吧情节。以下是我的代码
output$city_plot <- renderUI({
clean_data(data) %>%
group_by(registrant_city) %>%
summarise(Total= n()) %>%
arrange(desc(Total)) %>%
ggplot(data=clean_data(data),aes(x= registrant_city, y = Total)) +
geom_bar(aes(fill= registrant_ci
浏览 0提问于2016-10-19得票数 0
回答已采纳
在ggplot2中，元素的大小是单独指定的。当图形的大小发生变化时，元素(例如图例)不会改变。当输出ggplot2图形的大小随浏览器窗口的变化而变化时，这可能是一个问题。下面是一个虚拟的闪亮应用程序的代码和两个不同浏览器窗口大小的输出数字。这个较小的人物是丑陋的，因为它的传说已经被切断。
是否有一种方法可以直接在ggplot2中使用图形大小来缩放图例大小，而无需预先将图形保存为闪亮应用程序的图像文件？
library(shiny)
library(ggplot2)
ui <- fluidPage(
br(), br(), br(),
plotOutput("te
浏览 4提问于2015-12-14得票数 12
回答已采纳
我有下面的代码，基本上我想接受两个输入，并返回一个图的输出图，x轴上的时间和y轴上的时间是input1/input2的比率。我已经尝试了aes和aes_string，但似乎不能得到一个工作块显示内部闪亮的应用程序的比率。(根据年份绘制input1没有任何问题。 ui <- navbarPage("y",
tabPanel('Teacher Type Comparison',
sidebarLayout(
sidebarPanel(
selectInput('teacher
浏览 8提问于2020-04-11得票数 0
我有一个R闪亮的应用程序，它根据用户选择的x变量绘制来自mtcars数据集的horsepower。我希望用户能够在绘图之前选择在x变量上执行的转换。在下面的简化示例中，这些转换是将其平方或获得其倒数的能力。我正在使用一个switch函数来做这件事。 虽然这个切换函数可以在非闪亮的环境中工作，但我无法让它在一个运行的闪亮的应用程序中执行。我知道我可以对数据帧的被动副本执行转换，并从中绘制图形，但如果可能的话，我希望在ggplot调用本身中执行转换。有谁对如何做到这一点有什么建议吗？ library(shiny)
library(tidyverse)
tran_func <- funct
浏览 18提问于2020-10-25得票数 4
回答已采纳
1回答
这是我制作的的贴子。最初的问题要求用户将一些值输入到某些文本框/数字框中，计算一些函数，然后在数据帧中显示结果。它可以使用以下R代码计算(其中还包括我还想添加的ggplot2图)。
R代码：
someFunction <- function(S, K, type){
# call option
if(type=="C"){
d1 <- S/K
value <- S*pnorm(d1) - K*pnorm(d1)
return(value)}
# put option
if(type=="P")
浏览 2提问于2020-06-28得票数 1
回答已采纳
1回答
我使用R闪亮为一个应用程序中不同变量的散点图创建多个选项卡。我的代码看起来不错，但是错误说我没有“定义我的主面板”。能不能有人帮我找错地方，或者如果我的方法不准确，请在这里输入代码，请告诉我！
library(shiny)
library(tidyverse)
India <- read.csv("D:/R/Practice 3/Indiadata.csv")
# Define UI for application that draws a histogram
ui <- fluidPage(
# Application title
titleP
浏览 0提问于2021-10-26得票数 0
回答已采纳
1回答
我有这个闪亮的代码，因为某些原因，情节没有显示出来。你能帮我一下吗？是在主面板中渲染的一个基本的闪亮的情节。检查了大量的时间，但仍然没有作图。
library(shiny)
library(plotly)
library(ggplot2)
ui <- fluidPage(
(titlePanel("APP & MEP | Size (m2) ~ Hours", windowTitle = "app")),
sidebarLayout(
sidebarPanel(
checkboxGroupInput(inputId
浏览 4提问于2016-03-07得票数 0
回答已采纳
1回答
当我在R中创建下面的条形图时，没有问题，但当我将这些代码转换成闪亮的函数时，问题发生了，你能帮助我吗？ 普通R代码中的条形图： path <- "WA_Fn-UseC_-HR-Employee-Attrition.csv (job attrition)"
data <-fread(path)
# bar chart function function
Categorical_vs_categorical_plot_2 <- function(data,group_col,fill_col){
data %>%
ggplot(aes_(x =
浏览 19提问于2021-02-05得票数 0
回答已采纳
我是新的闪亮和有问题的滑块输入，它工作良好的数据集，但不工作，我的直方图，请您帮助我看看，谢谢。
概述
我试图构建一个闪亮的应用程序来显示态度{数据集}，第一个选项卡只显示数据，滑块运行得很好，但是在第二个选项卡中，滑块输入不适用于我的直方图。我不知道为什么，我尝试了rChart之前，它也起作用。请忽略about.md文件，这只是描述。
代码
ui.r
library(shiny)
require(markdown)
library(ggplot2)
# Define UI for application that draws a histogram
shinyUI(
navbarPa
浏览 2提问于2015-11-13得票数 0
回答已采纳
下列代码不起作用：
library(ggplot2)
library(shiny)
shinyApp(ui=fluidPage(
plotOutput("plot", click="clicked"),
tableOutput("near")),
server=function(input, output, session) {
df <- data.frame(x=rnorm(100), y=rnorm(100))
output$
浏览 1提问于2021-05-17得票数 2
回答已采纳
1回答
我正在尝试构建一个闪亮的应用程序，它可以根据用户选择的输入来更改绘图/图形类型。
我有两个使用相同数据集生成的图表。一个是条形图，另一个是零碎的。
我有一个输入，用户可以在这里选择他们想要看到的图形类型。但我的问题是，我无法根据输入得到要更改的图形。这是我工作的截图。
当用户选择分段图标时，我想要的输出将是将此更改为分段。就像下面
我只是想不出如何将UI中的inputId连接到应用程序的服务器端。
这是我的代码
#APP
ui <-dashboardPage(
dashboardHeader(title = "ShinyWidget Plot Change"
浏览 3提问于2022-01-20得票数 1
回答已采纳
我正在创建一个基于usr输入的R闪亮应用程序的情节。我对数据的过滤有点复杂，我不确定fow是否可以将它传递给ggplot中的“填充”。下面是我的代码：
data <- reactive({
req(input$name)
req(input$type)
fp %>%
dplyr::filter(
name %in% input$name,
if_any(
matches(
str_c('status___', tolower(input$type))),
浏览 5提问于2022-05-19得票数 -1
我试图使这个闪亮的应用程序从选择器(ui)获取数据，并将其传递给r代码(服务器)，但它没有工作，也没有输出错误。
问题似乎在于如何将$date输入到filter correctly.For实例中，如果我键入filter(DATE>='2020-05-01')，它就会工作。
贝娄是一个片段：
ui <- fluidRow(box(width = 4,dateInput("date",format = "dd/mm/yyyy",language = "pt-BR", label = h3("DATE"),v
浏览 2提问于2020-06-03得票数 0
回答已采纳
我是新来的，和闪亮的工作，我正在努力做一个圈套。根据我所读到的，我必须使用aes_string而不是aes()，但我仍在试图找出原因。
我的代码：
output$scatterplot <- renderPlot({
ggplot(data = movies, aes_string(x = input$x, y = input$y,
color = input$z)) +
geom_point(alpha = input$alpha)
})
浏览 7提问于2020-09-04得票数 1
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
即时通信 IM
实时音视频活动推荐
腾讯云开发者
