POSIXct轴和ggplot中的sliderInput与shiny
- POSIXct轴是R语言中用于处理日期和时间的数据类型，具体来说，POSIXct是指从1970年1月1日0时0分0秒（UTC时区）至今所经过的秒数。在绘制时间序列图或者处理时间数据时，可以使用POSIXct轴来表示时间轴的刻度。
- sliderInput是shiny包中的一个函数，用于创建一个可以通过滑动条选择数值的输入组件。它通常用于在shiny应用程序中创建交互式图形用户界面，让用户可以通过滑动条选择一个数值，供后续的数据分析或可视化使用。
- ggplot是R语言中的一个数据可视化包，它提供了一套用于绘制高质量图形的语法。ggplot中的sliderInput函数并不存在，可能是因为ggplot本身不直接提供交互式图形界面的功能。但可以结合其他包，比如shiny，来创建包含滑动条选择数值的交互式图形界面，再使用ggplot来绘制相应的图形。
总结： POSIXct轴是R语言中用于处理日期和时间数据的类型，可以用于绘制时间序列图。sliderInput是shiny包中的函数，用于创建滑动条输入组件，可以在shiny应用程序中实现交互式图形界面。ggplot是R语言中的一个数据可视化包，可以与其他包结合使用，在shiny应用程序中创建交互式图形界面，再使用ggplot进行图形绘制。
腾讯云相关产品和产品介绍链接地址：
- 腾讯云计算服务：https://cloud.tencent.com/product/compute
- 腾讯云物联网平台：https://cloud.tencent.com/product/iotexplorer
- 腾讯云人工智能：https://cloud.tencent.com/product/ai
- 腾讯云移动开发：https://cloud.tencent.com/product/mapp
- 腾讯云存储服务：https://cloud.tencent.com/product/cos
- 腾讯云区块链：https://cloud.tencent.com/product/baas
- 腾讯云元宇宙：https://cloud.tencent.com/solution/vr-ar
相关·内容
我没有成功地在sliderInput和reactive之间建立联系，以便在我的图中改变小时范围……在我的脚本中，小时列的类型是hms，有人能帮我吗？非常感谢:slight_smile： library(shiny)
library(ggplot2)
library(dplyr)
library(shinyTime)
library(lubridate) #variable temps
route_fond_degre <- c(1:10)
vitesse_fond_noeuds <- c(2:11)
heure <- c("01:05:30","0
浏览 7提问于2021-04-15得票数 0
我在Shiny中的ggplot有问题。我是个新手，所以在代码中可能有一些新手错误。但我收到以下警告： Listening on http://127.0.0.1:4278`
Warning: Removed 93 rows containing non-finite values (stat_smooth).
Warning: Removed 93 rows containing missing values (geom_point).
Warning: Removed 1 rows containing missing values (geom_text). R代码： library(s
浏览 8提问于2019-05-03得票数 1
2回答
我得到一个警告(警告:删除了包含缺失值(Geom_path)的2行。)，对于下面的代码，我不想拥有它：
library(shiny)
library(ggplot2)
library(scales)
ui <- navbarPage("Test",
tabPanel("Test_2",
fluidPage(
fluidRow(
column(width
浏览 3提问于2019-11-07得票数 0
回答已采纳
我是个新手。我正在尝试使用sliderInput来处理带有ggplot和shiny的日期。我可以使用dygraphs，它起作用了。但我希望继续使用ggplot来实现数据可视化。下面的R脚本可能是一团糟。我就是不能让sliderInput在使用ggplot的闪亮应用上工作。 数据集为here。 library(shiny)
library(scales)
library(ggplot2)
library(reshape2)
# Set system language as Japanese
Sys.setlocale(category = "LC_ALL", locale
浏览 20提问于2021-04-28得票数 0
回答已采纳
我已经尝试过在中推荐的所有解决方案。不幸的是，我无法用他们中的任何一个来解决这个问题。
我已经创建了一个闪亮的应用程序，它可以生成各种变量的年度数据线图。对于大多数参数化来说，这是很好的结果：
没有非整数中断。
但是，如果我在滑块上选择一定的时间跨度，它会生成x轴上有非整数断线的图形，这对于年度数据来说是没有意义的。
带非整数断线
编辑：这里是应用程序的最小可复制版本
library(tidyverse)
library(shiny)
options(scipen = 999)
# Data
data1<-data.frame(values = c(15500,
浏览 0提问于2018-08-01得票数 0
回答已采纳
我对R比较陌生，我正在尝试在Shiny中构建一个反应式的ggplot，其中X轴(日期)是UI中的dateRangeInput的反应式。我到处用谷歌搜索，但我尝试的每一件事都返回错误。 在ggplot中，aes()从一个名为datecorrected_totals的数据集调用，其中x是日期，y=load是我希望对daterangeinput作出反应的两个值，这样ggplot将根据日期范围输入中的周期调整比例。 library(tidyverse)
library(shiny)
library(tidyr)
library(lubridate)
library(zoo)
data <- r
浏览 31提问于2019-12-21得票数 0
我有一个rangePicker输入，它动态地设置sliderInput在renderUI函数中的开始和结束周期。当我在animate = TRUE中设置sliderInput时，就会出现play按钮，但是单击它什么也不会做。
当在UI中放置sliderInput并传递模拟开始日期和结束日期时，play按钮按预期工作，即滑块在单击时从min移动到最大值。
如何在renderUI中获得此功能？可复制代码：
library(shiny)
library(tidyverse)
dat <- data.frame(
period = seq(from = as.POSIXct("20
浏览 2提问于2022-10-10得票数 0
回答已采纳
请在下面找到一个可重现的例子来解释我的问题(我使用的是与Shiny R包直接相关的manipulateWidget R包)：
library(ggplot2)
library(plotly)
library(manipulateWidget)
library(data.table)
my_data <- data.table(
DAT_RLV = as.POSIXct(c("2017-01-20","2017-01-21","2017-01-22",
"2017-01-23&
浏览 0提问于2018-03-28得票数 2
我一直在为“观察的数量”在我的getting图中添加一个功能滑块输入，但是我一直在出错。下面的代码可以工作，但是图没有改变(我尝试了很多东西，比如添加一个反应函数，或者在ggplot中添加输入$obs，，但是它仍然不起作用)。我真的很感激你的帮助！谢谢
library(shiny)
library(shinydashboard)
library(readxl)
library(ggplot2)
library(dashboardthemes)
library(shinyWidgets)
library(dplyr)
df=read_excel("MASI.xlsx")
#
浏览 3提问于2021-04-13得票数 0
1回答
我正试图修改我闪亮的代码，使我的情节变得可缩放。
问题是，我的x轴使用as.POSIXct日期作为它们的限制。
例如，当前应用程序的一个工作版本是：
library(shiny)
ui <- fluidPage(selectInput(inputId = "data",label="Make a choice", choices=c("A","B")),
plotOutput("plot1"),dateInput(inputId = "lowerlimit",
浏览 3提问于2016-06-02得票数 2
回答已采纳
我在一场比赛中有25辆车跑了58圈。
我想有一个滑块，我想控制圈，在图表中看到x轴在一个图形。
UI：
sliderInput("lapsView",
"Choose laps to view:",
min = 1,
max = 58,
value = 10)
服务器：
library(shiny)
shinyServer(function(input, output) {
output$distPlot <- renderPlot(
浏览 0提问于2016-08-07得票数 2
回答已采纳
2回答
我正在尝试建立一个闪亮的应用程序来显示10个受影响最严重国家的新冠肺炎案例，每天都会从ECDC网站上进行更新。我希望能够使用滑块输入限制病例和死亡人数，并使用日期输入选择日期周期(都已添加)。代码如下，但当我运行应用程序时，我得到了一个空白图，轴显示正确，但我无法让点出现。这应该能够在任何计算机上运行，因为代码只是从ECDC页面下载数据集。有什么解决方案吗？ library(shiny)
library(readxl)
library(dplyr)
library(httr)
library(ggplot2)
library(plotly)
url <- paste("htt
浏览 20提问于2020-03-23得票数 1
回答已采纳
1回答
我在R中使用闪亮的代码来生成多个(30)盒图。我有大约30个类别(x轴)，我试图同时显示，并希望调整x轴在底部，以便我可以看到每个名称在一个90度的角度。我试着把条件放在“ggplot”中，这是一条“巧妙”的线条，用来调整x轴/y轴，但它在这款闪亮的应用程序上没有任何作用。我还想调整y轴的勾号，使它们在每1000美元的值上打勾。我可以使用ggplot2再现图形，并调整x/y轴，但希望使图形动态闪亮，这样我就可以应用不同的过滤器。我试图绘制‘名称’(X轴，分类)与‘美元’(Y轴，数字)，并有大约30个不同的‘名称’，我想看看。我的数据有10K+行。
Sample Data:
ID Tr
浏览 1提问于2018-11-07得票数 0
回答已采纳
1回答
我试图选择唯一的值，我的范围滑块在我的闪亮应用程序。我能够使用SliderTextInput做到这一点，但我很难找到一种方法来做这个范围滑块。请看下面的代码。有什么建议吗？
#Example dataframe:
df<- data.frame("ID" = c("001","001","001"), "date" = c("2020-07-01 01:00:00","2020-07-01 03:00:00","2020-07-01 06:00:00"
浏览 14提问于2021-08-08得票数 0
回答已采纳
1回答
R:在时间变量中循环的闪亮散点图
、、、、
使用闪亮和ggplot2，我试图创建一个散点图，它将通过时间变量(从00:00开始，结束于24:00)，并在该坐标的时间出现时绘制X和Y。这将创建一个逐帧的参考点是如何移动的。
df：
Ui.R-SliderWidget输入
sliderInput("time", "Time:", 00:00, 24:00, 00:00,
step = 00:01, animate=
animationOptions(interval=300, loop=TRUE))
在我指定的步骤=
浏览 3提问于2017-08-03得票数 1
回答已采纳
我想使用R的shiny包生成一个应用程序。我想上传从另一个项目和添加一些互动的内容。
当我使用geom_point()向在相同R代码中创建的ggplot添加数据点时，这种方法工作得很好。但是，当我再次保存并重新读取ggplot (*)时，会发生错误。我仍然可以添加geom_point (**)，但它不接受来自input$slider的交互式内容。
ui.R
library(shiny)
shinyUI(
fluidPage(
# Title
titlePanel(""),
# sidebar
sidebarLayout(
浏览 2提问于2017-04-18得票数 1
回答已采纳
我有时间序列数据，每个时间都有一个观察值。我通过R的splinefun运行它来为观测值创建一个样条函数。我想用stat_function在ggplot2中绘制这个样条函数。我希望我的图将日期/时间作为X轴，而不是逐行索引的X轴。可以说，我已经尝试了很多方法，从编辑splinefun的结果(试图使其与as.POSIXct一起工作)，到在ggplot命令中使用不同的美感。 如何获取X轴上的日期/时间？ 这是我目前的情况： ? 这是一个重述： library(ggplot2)
DateTime <- seq.POSIXt(from = as.POSIXct('2020-01
浏览 25提问于2020-04-22得票数 2
回答已采纳
1回答
是否可以自定义ggplotly()工具提示中的标签以反映图表x和y轴的标签，如果可以，这是如何完成的。为了清晰起见，在工具提示标签中，我指的是用红色圈起来的部分，以及x和y轴的标签，我指的是在下面的图像中以绿色圈起来的部分。
我使用variables制作了一个交互式文档，并制作了一个直方图，用户可以在该直方图中从数据帧中的多个变量中选择要显示的变量。这是我的代码：
---
title: "Title"
output: html_document
runtime: shiny
---
{r, echo = FALSE}
library(epiDisplay)
libra
浏览 2提问于2021-10-20得票数 0
1回答
我是ggplot图书馆的新手。并试图使用以下data.frame绘制该图
library(tidyverse)
df <-
tribble(~event, ~startdate,~enddate,~loc,
"A",as.POSIXct("1984/02/10"),as.POSIXct("1987/06/10"),"1",
"B",as.POSIXct("1984/02/11"),as.POSIXct("1990/02/12"),"2
浏览 1提问于2020-10-21得票数 6
回答已采纳
1回答
我不明白为什么我的R代码给了我这个错误：
data必须是数据帧或其他可由fortify()强制强制的对象，而不是数字向量。
library(shiny)
library(ggplot2)
ui <- fluidPage( sliderInput(inputId = "num",
label = "Choose a number",
value = 25, min = 1, max = 100), plotOutput("ggplot") )
server <- funct
浏览 18提问于2022-05-24得票数 1
回答已采纳
我正在尝试获取一个可调整大小的绘图的值(使用shinyjqui)，并使用它来更新sliderInput。但是，我可以获取该值，但无法将其更新为sliderInput。我试着使用observe和observeEvent，但是我卡住了。 代码 library(shiny)
library(shinyjqui)
library(ggplot2)
ui <- fluidPage(
tags$p("Height value from draggable plot"),
verbatimTextOutput('size_obj'),
# textInp
浏览 15提问于2021-08-27得票数 0
是否有方法将用户输入(x轴、y轴、颜色等)链接到R闪亮的gganimate图形？因此，当用户选择不同的输入时(x轴、y轴、颜色等)从下拉列表上。gganimate图会被不同的x轴、y轴、颜色等填充，这样就可以相应地改变它了？
我尝试的代码如下所示。由于我在UI中保存的变量名(xValue、yValue、colorValue等)中包含了ggplot函数，所以出现了错误。
UI代码的思想来自于这里：，它将显示如下内容：
library(shiny)
library(shinythemes)
library(palmerpenguins)
library(gganimate)
lib
浏览 7提问于2022-04-09得票数 1
回答已采纳
我正试图用这样的时间戳因子格式制作一个为我的数据发亮的应用程序："2017-03-07 :06:00“，"2017-03-07 : 06:00:00”。它们是每小时的数据，然而，某些日期或时间在整个数据中丢失。我希望能够在两个任意的日期时间之间选择数据。这就是我迄今为止所做的：
sliderInput(inputId = "slider_datetime",
label = "Date & time:",
min = as.POSIXct("20
浏览 1提问于2018-09-11得票数 0
1回答
我似乎无法得到我的阴谋来获得这个闪亮的应用程序的拉曼数据。任何帮助都将不胜感激。
ui.R
library(shiny)
library(ggplot2)
shinyUI(fluidPage(
fluidRow(
sidebarLayout(
sidebarPanel(
selectInput("team","Select Team",choices=levels(teamID)),
sliderInput("year","Include Years in Range",min=1871,max=2014,
浏览 1提问于2016-04-23得票数 0
我正在开发一个R/闪亮的应用程序，它使用dateRangeInput的输出在ggplot2图中设置x轴限制。使用dateRangeInput设置数据很好，但我无法让scale_x_date (或scale_x_continuous或scale_x_datetime)识别dateRangeInput返回的日期。我尝试过使用format()、as.Date、as.POSIXct，但是没有得到任何成功。无论我是否试图转换dateRangeInput的输出，我都会得到：
Invalid input: date_trans works with objects of class Date only
下面
浏览 2提问于2016-04-14得票数 0
回答已采纳
给定以下数据帧：
structure(list(Event = c(NA, "Safari Zone Europe", "Community Day",
"Shiny Lugia Raid", "Community Day", NA, "Community Day", NA,
"Community Day", NA, NA, "Dortmund Safari Zone", "Dortmund Safari Zone",
"Community Day
浏览 1提问于2018-08-08得票数 0
回答已采纳
1回答
我怎样才能得到用ggplot创建的交互式地图的x和y坐标，并在R shiny中绘制？我想要获得x轴值，并在此基础上显示其他数据。下面是一些虚拟代码。 library(shiny)
library(plotly)
library(ggplot2)
ui <- fluidPage(
plotlyOutput("distPlot")
)
server <- function(input, output) {
output$distPlot <- renderPlotly({
gg1 = iris %>% ggpl
浏览 6提问于2020-12-20得票数 1
回答已采纳
我正在尝试从不同的数据集生成2个图形。我希望这些图具有相同的x轴断裂和标签。其中一个图有一个scale_x_date轴，另一个有一个scale_x_datetime轴。
尽管给予这些函数相同的参数，但结果轴是不同的。我想不出怎样才能让它们变得一样。
两个数据集"soil_N_summary.csv“和"weather_data.csv”可以下载。
我使用了以下代码来生成如下图表：
library(ggplot2)
library(dplyr)
### import data
soil_N_summary <- read.csv("soil_N_summary.cs
浏览 1提问于2016-09-20得票数 1
回答已采纳
我想用mapview包--它相当快--在闪亮中。为了呈现mapview对象，@map技巧的效果很不错。
然而，与ggplot2相反，使mapview_leaflet对象具有响应性是相当复杂的。在我闪亮的应用程序中，我想让调色板具有交互性。这有可能吗？
library(mapview)
library(shiny)
server <- function(input, output) {
output$test <- renderLeaflet({
req(input$obs)
rws <- input$obs
mapview(breweries91
浏览 0提问于2018-07-02得票数 1
1回答
我试图用POSIXct绘制一个具有x轴类“ggplot2”的时间序列，这个时间序列一直工作到一定程度。
当我试图使用scale_x_datetime操作x轴断裂和标签时，它会在x轴上产生一个月的移位。
有人能解释这一点，并提供一个解决方案吗？
示例简化代码：
start <- as.POSIXct("2014/07/01 00:00:00")
end <- as.POSIXct("2014/10/01 23:30:00")
interval <- as.difftime("00:30:00")
df <- data.fra
浏览 4提问于2016-07-29得票数 3
回答已采纳
1回答
我想要做的是创建一个闪亮的应用程序，当它在时间变量(T)中循环时，它会将我的x和y绘制在散点图上。
grph数据：
id x y t
1 3 8 3
2 6 2 8
3 2 6 1
1 9 4 5
server.R
library(shiny)
library(ggplot2)
function(input, output) {
#Store data into df for plotting
df <- data.frame(grph, header = TRUE)
#Plot output
output$plot <- renderPl
浏览 3提问于2017-08-21得票数 1
回答已采纳
1回答
我希望只有在更改滑块和按after按钮之后才刷新绘图。我不希望在改变了radioButton之后，情节会再变。我该怎么做？我试过这个：
library(shiny)
library(ggplot2)
#data change only once at the begenin
dt <- data.frame(x=runif(100), y=runif(100))
ui <- fluidPage(
sliderInput("slider1","slider1", value=5, min=1, max=10),
sliderInput(&
浏览 1提问于2017-03-21得票数 1
回答已采纳
我准备了一个按日期和时间as.POSIXlt订购的数据框架：
Date_Time A1 B2 C1 E2
46 24/06/2012 12:20:00 NA 5.515 20 NA
47 24/06/2012 13:20:00 41 NA NA 3.519
48 25/06/2012 14:00:00 NA NA NA NA
49 25/06/2012 14:20:00 30 NA 30 NA
50 27/06/2012 15:20:00 NA 71 NA NA
51 28/06/2012 18:00:00
浏览 3提问于2013-08-23得票数 1
回答已采纳
1回答
我有一个闪亮的仪表板，它有三个使用tabBox的选项卡，我想使用激活的选项卡来确定/使相关仪表板侧边栏输入可见。目前，他们都同时出现…我希望一些消失，根据标签，是激活的。
下面是我目前的尝试。
在这方面的任何帮助都将非常感谢。
我的ui.R脚本如下：
#ui.R
library(shiny)
library(shinydashboard)
header <- dashboardHeader(
title = 'Simple dashbaord'
)
body <- dashboardBody(
fluidRow(
column(width=12,
浏览 1提问于2015-05-19得票数 2
我正在尝试开发一个shiny app，在其中我给用户一个上传数据文件(CSV或txt)的选项。然后，我想从这些数据中呈现一个ggplot或plotly。该数据集中有多个列。因此，我需要呈现各种绘图，并且通过用户选择该数据集中的列作为x轴数据和y轴数据来呈现它们。我已经为用户提供了选择x和y轴的数据列的选项。但是，当我馈送用户选择用于绘图的数据列时，输出没有显示任何图形。 我的图的代码： df <- mtcars
ggplot(df, aes(x, y)) +
geom_point(aes(color='blue')) 我应该使用aes还是aes_string来呈现上载数
浏览 24提问于2020-03-23得票数 2
回答已采纳
1回答
我想要生成一个交互的图形(使用RStudio附带的操纵包)，它有时间作为x轴。用户应该能够使用这个轴上的滑块来改变图形的x-限制，但我无法做到这一点。再现错误的代码是：
require(manipulate)
df <- data.frame(time=seq(ISOdate(2000,1,1),by="month",length.out=100),y=rnorm(100))
# This would do a standard - non interactive - ggplot
#ggplot(df,aes(x=time,y=y))+
#geom_line(
浏览 3提问于2014-03-23得票数 1
回答已采纳
我正在调查一个包含Prosper贷款信息的数据集，特别是投资者行为。
我想创建的图将显示y轴上的投资者和x轴上的时间，并将其与平均月份绑定在一起。信用等级也会影响到这一点。最终，我希望每个bin显示每个信用等级( facet变量)的总投资者的百分比，每个计算的月(或实际的月，但计算似乎更容易装箱)。
我已经尝试过..density..，..count../sum(..count..)，geom_density等，看到很多帖子都会把每个面的总和设置为1，或者整个图的总和设置为1。为了重新迭代，我尝试将所有方面中的每个面元的总和设置为1。我也希望直接在ggplot中这样做，而不是改变数据帧，但我会
浏览 0提问于2016-02-07得票数 0
我只想在用户单击操作按钮时更改颜色参数的值，但在shinyApp开始时，我希望拥有默认颜色。
我拿到了这个：
library(shiny)
library(ggplot2)
#data change only once at the begenin
dt <- data.frame(x=runif(100), y=runif(100))
ui <- fluidPage(
sliderInput("slider1","slider1", value=5, min=1, max=10),
sliderInput("slider2&#
浏览 2提问于2017-03-21得票数 2
回答已采纳
2回答
我正在尝试绘制这些风速数据，并在x轴上显示年份。数据框设置为
wsAvg<-data.frame(date=as.POSIXct(ws07$date[1224:1559]),u.1=(ws07$u[1224:1559]),stringsAsFactors = FALSE)
wsAvg<-rbind(wsAvg,c(date=as.POSIXct(ws08$date[1032:1367]),(ws08$u[1032:1367])))
下面使用ggplot绘制我的风速数据框。
ggplot(wsAvg,aes(x=date,y=as.numeric(u.1)))+geom_point(
浏览 0提问于2020-04-22得票数 0
这让我很痛苦。
我想简单地有一个接受日期(最好是按月)的sliderInput，并因此更改一个简单的ggplot_bar。虽然我可以显示所有内容，但似乎对滑块的变化没有任何反应：
下面是我的代码：
ui.r
library(shiny)
# Define UI for application that draws a histogram
shinyUI(fluidPage(
# Application title
titlePanel("St Thomas' Physiology Data Console"),
# Sidebar with a sli
浏览 2提问于2016-12-01得票数 10
回答已采纳
1回答
我试着用闪亮的图形制作互动图，你可以用滑块来改变双Y轴图上的一条线的缩放值。
下面是我用来绘制闪亮图形的代码，我的目标是将"coeff“变量定义为UI中滑块的输入，然后将其合并到如何计算行的值中。
###Shiny dual Y axis plot
library(shiny)
library(ggplot2)
ui <- fluidPage(
titlePanel("Line Graph"),
sidebarLayout(
sidebarPanel(
sliderInput("scalegvt","Scal
浏览 2提问于2022-04-25得票数 1
回答已采纳
我和我的朋友正在用ggplot学习R闪亮。我们发现x轴标签超出了网格。 简单的数据文件在这里：https://drive.google.com/file/d/1pZQe89wxw14lirW2mRIgi9h29yPyc7Fs/view?usp=sharing 我们在幻灯条和x轴上删除了年份的小数点(使用scale_x_discrete(limits=c(input$year[1]:input$year[2]))) 但另一个问题出现了:为什么2020 x轴标签超出了网格？ PS:没有2020年和2021年所有项目的数据。 有两种方法可以解决: 1.覆盖网格中的x轴标签。2.禁止用户沿着幻灯条选
浏览 37提问于2021-09-18得票数 0
我可以从谷歌导入我闪亮的网页应用程序中的Lato字体并使用它，但我想将我的ggplot2图形中的字体更改为Lato，但由于家庭争论，它不起作用，因为ggplot只想访问windows字体。
下面是我的代码：
library(shiny)
library(shinyjs)
library(dplyr)
library(ggplot2)
#library(showtext)
ui <- shinyUI(fluidPage(
tags$head(tags$style(
HTML('
@import url("https://fonts.
浏览 2提问于2021-07-23得票数 0
我最近开始使用shiny做一些工作，我意识到manipulate (来自库manipulate)和sliderInput (来自库shiny)似乎都做了同样的事情。两者之间有什么功能上的区别吗？
浏览 1提问于2015-06-05得票数 0
2回答
我想绘制包含数字和持续时间的数据。对于字符向量的转换，我选择了lubridate包。不幸的是，持续时间总是以秒为单位在x轴上打印：
set.seed(20161027)
a <- c("00:30:45", "00:59:07", "01:08:30", "02:10:09", "02:20:53")
b <- rnorm(n = 5)
example <- data.frame(a, b)
# This is what I want
ggplot(data = example, aes(x =
浏览 1提问于2016-10-27得票数 0
回答已采纳
我想把selectinput和renderplot(ggplot)结合起来。我想制作我选择的年份和月份的条形图。如果我选择select year(yil) 2009并选择month(ay) 2，plot be like必须显示我选择。这就像过滤器，也许我不知道如何解决这个问题。年和月值在我的数据网格中，我分享了我的数据图片 我的ui.R； library(shiny)
library(ggplot2)
shinyUI(fluidPage(
titlePanel(title=h4("Norvec Arac Satıs Verisi 2007-2016",align
浏览 35提问于2019-12-09得票数 1
回答已采纳
这是我想做的第一个闪亮的应用程序。
以前，我复习了一些教程，当我在外部运行应用程序时，所有这些都显示在web浏览器中。
现在，一切都显示在网页浏览器，但一个情节显示在观众在R演播室。它是对sliderInput的反应，它在web浏览器中正确地显示，我显然想让它在web浏览器中显示所有的内容
有什么问题吗？我用钻石数据集做了一个可复制的例子，代码如下：
ui.R
library(shiny)
library(ggvis)
library(ggplot2)
library(dplyr)
shinyUI(fluidPage(
titlePanel("Analyza demograf
浏览 1提问于2015-08-22得票数 0
回答已采纳
我正在尝试创建一个简单的、闪亮的应用程序，用于绘制运行在Amazon上的rstudio中的直方图，用于存储为ec2文件的结果数据。我已经检查了所有的东西。看上去很好。我还检查了数据类型:都是数字类型。
我的密码：
ui.R
# shiny plots on top_docs data
library(shiny)
shinyUI(fluidPage(
# Header title
titlePanel(title = h4("Top doctors plots - a histograms", align = "center")),
# Si
浏览 3提问于2015-07-20得票数 0
回答已采纳
1回答
我想在R中创建时间序列，但我遇到了问题。我有30.07的风速数据。设置为02.09。每小时一次的决议。X轴上应该是日期和时间，y轴上应该是风速。我尝试了这个脚本，但不幸的是它不起作用。有谁能帮帮我吗？这是我的代码： options(stringsAsFactors = FALSE)
input1 <- "C:\\Users\\wind_speed.csv"
wind_speed <- read.csv(input1, sep=";")
dput(wind_speed)
library(ggplot2)
浏览 16提问于2018-12-27得票数 3
回答已采纳
1回答
我希望下图中的x轴从06:00开始，到22:00结束，每4小时休息一次。不过，我想不出以下几点。
( a)如何使x轴在06:00开始，而在06:00之前没有空位.
( b)如何使x轴在22:00结束，而在22:00之后没有空位.现在它连22点的时间都没有
( c)如何每4小时休息一次。
( d)如何将标签分配给y轴(目前它只是X4，列名)。
我试过几件事，但都没成功。一些示例数据：
range <- seq(as.POSIXct("2015/4/18 06:00"),as.POSIXct("2015/4/18 22:00"),"mins")
浏览 3提问于2016-02-28得票数 5
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
实时音视频
即时通信 IM活动推荐
腾讯云开发者
