需要像"dateRangeInput“这样的UI选择器用于R闪亮应用程序中的数值字段
"dateRangeInput"是一个用于R闪亮应用程序中的数值字段的UI选择器。它允许用户选择一个日期范围，以便在应用程序中进行数据筛选和分析。
该UI选择器的主要功能包括：
- 日期范围选择：用户可以通过该选择器选择一个起始日期和一个结束日期，以定义一个日期范围。
- 数据筛选：选择器可以用于筛选数据集中在指定日期范围内的数据，以便进行进一步的分析和可视化。
- 用户友好界面：选择器提供了一个直观的用户界面，使用户能够轻松地选择日期范围，而无需手动输入日期。
- 灵活性：选择器通常提供了多种日期格式和选项，以满足不同应用程序和用户的需求。
应用场景：
- 数据分析应用程序：在数据分析应用程序中，用户可以使用"dateRangeInput"选择器来定义他们感兴趣的日期范围，以便对数据进行分析和可视化。
- 金融应用程序：金融应用程序中经常需要对特定日期范围内的数据进行分析和报告。"dateRangeInput"选择器可以帮助用户选择所需的日期范围。
- 项目管理应用程序：在项目管理应用程序中，"dateRangeInput"选择器可以用于选择项目的开始日期和结束日期，以便进行项目计划和进度跟踪。
腾讯云相关产品推荐： 腾讯云提供了一系列云计算产品，其中包括与R闪亮应用程序开发相关的产品。以下是一些相关产品的介绍和链接地址：
- 云服务器（CVM）：腾讯云的云服务器产品提供了可靠的计算资源，可用于部署和运行R闪亮应用程序。了解更多：云服务器产品介绍
- 云数据库 MySQL：腾讯云的云数据库产品支持MySQL数据库，可用于存储和管理应用程序的数据。了解更多：云数据库 MySQL产品介绍
- 云存储（COS）：腾讯云的云存储产品提供了安全可靠的对象存储服务，可用于存储和管理应用程序中的文件和数据。了解更多：云存储产品介绍
请注意，以上仅为腾讯云的一些相关产品示例，其他云计算品牌商也提供类似的产品和服务。
相关·内容
R闪亮应用程序有一个UI元素"dateRangeInput“，如下所示
dateRangeInput(
"daterange3",
"Date range:",
start = "2001-01-01",
end = "2010-12-31",
min = "2001-01-01",
max = "2012-12-21",
format = "mm/dd/yy",
separator =
浏览 21提问于2021-05-27得票数 0
1回答
我想把我那闪亮的应用程序破解成模组。以下是代码：
library(shiny)
library(plotly)
testModuleUI <- function(id) {
ns <- NS(id)
tagList(
checkboxInput(inputId = ns("select_dynamic_date_range"),
label = "enable date range",
value = FALSE,
浏览 0提问于2018-04-19得票数 0
1回答
我有一个闪亮的仪表板，它的范围通过我放在一起的反应性dateRangeInput来调整(请参阅下面的代码)。
一切正常，但后来我更新了我的包裹。从那时起，变量不会在第一个实例中自动显示，您必须选择日期范围，而不是使用默认时间范围加载的绘图。
此外，dateRangeInput使用的是一些奇怪的语言，如monate、tueate、wedate等。
我需要一些帮助来确定我的问题可能是什么。
会话信息
在更新之前，我使用的是Ploly3.6.0、shinyDashboard 0.5.1和闪亮的0.13.2。
更新后，我使用的是Ploly4.5.6、shinyDashboard 0.5.3和闪亮的0.
浏览 2提问于2017-08-16得票数 0
我是一个非常新的闪亮或任何仪表板相关的开发，这一点。我的问题有点具体，只解决了数据是如何显示的，而不是讨论应用程序的内部逻辑。 我在dateRangeInput中应用了language = "ru"选项，它改变了日期选择器中文本的呈现方式，但没有改变两个日期字段之间的"to“。我知道这听起来像是在吹毛求疵，但这些小细节对我正在尝试做的事情很重要。Screenshow来解决这个问题。 提前感谢！ ? ui <- fluidPage(
titlePanel("Калькулятор остатков"),
sidebarLayout(
浏览 26提问于2020-09-24得票数 2
回答已采纳
编辑
我尽量简化我的代码：
服务器。R：
server <- function(input, output, session) {
output$body_UI<-renderUI({
tabPanel("Comparison",
{
fluidPage(
fluidRow(
box(
width=12,
solidHeader=T,
title="Parame
浏览 0提问于2019-08-08得票数 1
回答已采纳
我正在开发一个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
回答已采纳
我试图在闪亮的R包中使用dateRangeInput以及内置的输出DataTable，但是当我运行应用程序时，会得到错误：
Error in >=.default(date, input$dates[1]) :
comparison (5) is possible only for atomic and list types
我的代码是：
ui.R
dashboardBody(
fluidRow(
dateRangeInput("dates", &#
浏览 2提问于2015-11-21得票数 2
回答已采纳
我有一个闪亮的应用程序，用户选择两个日期范围，提交按钮第一个日期范围是为分析期间，而第二个日期范围是一个范围，应该属于在第一个日期范围。
我使用的是dateRangeInput，我希望将第二个dateRangeInput的最小和最大日期设置为从第一个dateRangeInput开始的用户选择的时间段。我现在的问题是，我现在设置它的方式是，第二个dateRangeInput在用户点击提交之前不会刷新，而我希望它在第一个dateRangeInput更改后立即刷新。
我怎样才能做到这一点？
到目前为止，我的代码如下所示：
#ui.R
shinyUI(fluidPage(
sidebarLay
浏览 6提问于2015-08-13得票数 2
回答已采纳
我有一个闪亮的应用程序，用户选择多个日期范围，我想阻止用户使用lapply函数中的dateRangeInput设置开始日期之前的结束日期。我如何在R中编码这个？谢谢你调查这个。
这是我的密码
library(shiny)
ui <-fluidPage(
checkboxInput("add_trend", "Add Trend(s)"),
conditionalPanel(condition="input.add_trend === true",
浏览 1提问于2017-04-25得票数 2
回答已采纳
我有一个闪亮的仪表板，下面有一个dateRange()输入，我想在其中传递带有时区的datetimes。但是，在将datetime对象转换为因子之后，当我尝试将它们转换为dates时，得到的结果是NAs。我该如何继续呢？ require(lubridate)
require(dplyr)
df = data.frame(timestring = c("2015-12-12 13:34:56", "2015-12-14 16:23:32"),
localzone = c("America/Los_Angeles"
浏览 20提问于2020-03-16得票数 0
回答已采纳
我在R中用线条、散乱点和填充的区域变量制作了一个Plotly图。X轴是用as.POSIXCT格式格式化的日期和时间，格式为"%Y-%m-%d %H:%M:%S“。每隔10分钟有2个月的数据。Y轴是单位数。
我正在把图表集成到一个闪亮的仪表板上。我想使用daterangeInput来选择X轴的日期范围。不过，我不知道如何集成daterangeInput以实现反应性/交互性。
任何帮助都将不胜感激！
纯正图，合并：
graph <- plot_ly(master, x = date, y = arrival.one, name = 'One Arrival',
浏览 2提问于2016-12-29得票数 2
回答已采纳
我正在为R使用发亮的包，在我的dateRangeInput ui.R：中实现了一个
dateRangeInput("date", "Date range:",
start = "2013-05-15",
end = "2013-10-01",
min = "2013-05-15",
max = "20
浏览 2提问于2014-04-03得票数 12
回答已采纳
我对R是新手，当我试图创建一个闪亮的应用程序时，我会面临一个问题。
我的应用程序在一个app.R中包含了UI dan，我想要创建一个启动闪亮应用程序的包。
在服务器函数中，我有一个反应性元素，它基于UI中的dateRangeInput函数对数据集进行子集。下面是UI中代码的一部分
df <- coronavirus # I use coronavirus package from CRAN
ui <- sidebarLayout(
sidebarPanel(
dateRangeInput(
inputId =
浏览 2提问于2020-10-17得票数 2
回答已采纳
我想在一个闪亮的应用程序中同步一个动态图形和一个DateRangeInput。下面的代码工作得很好:我可以同时使用缩放选项和daterange，但是由于“乒乓”效应，我不能使用dyRangeSelector：
library(xts)
library(shiny)
library(dygraphs)
library(lubridate)
data("co2")
data <- as.vector(coredata(as.xts(co2)))
serie <- xts(x = data,order.by = seq(from=today(),by=1,lengt
浏览 1提问于2018-03-10得票数 14
回答已采纳
1回答
我有一个问题，试图创建一个闪亮的应用程序。在这张表中：
data <- data.frame(
variable1 = c('S','S','S','N','N','N'),
variable2 = c('S','S','N','N','N','N'),
TYPE = c('REAL','ESTUDIO','REAL','ESTUD
浏览 3提问于2019-03-01得票数 0
回答已采纳
我试图通过一个互动的R闪亮的应用程序下载股票数据。我要求提供股票指数名称和下载数据的日期。在运行该应用程序后，我可以打印下载的数据，但我不能存储它们，以便以后使用它们。有人知道怎么做吗？谢谢
这是我的密码：
ui= fluidPage(
titlePanel("download stock data "),
sidebarLayout(
sidebarPanel(
helpText("Select an index to examine the stocks it contains.
Information will be
浏览 3提问于2019-09-17得票数 1
回答已采纳
1回答
我有以下数据集：
Type <- c("Choice 1", "Choice 1", "Choice 1", "Choice 1", "Choice 1",
"Choice 1")
Date <- c("02-02-2016", "02-03-2016", "02-04-2016", "02-05-2016",
"02-06-2016", "02-07-2016")
Sentime
浏览 1提问于2017-01-02得票数 0
回答已采纳
我的正常闪亮日期小部件提供日期选择按年-月-日。REPREX：
# Load library
library(shiny)
library(dplyr)
# Load data & prepare data
data(economics)
dat <- economics %>% filter(date > '2014-01-01')
# Define UI
ui <- fluidPage(
dateRangeInput(
inputId = 'enter_d
浏览 4提问于2022-02-20得票数 2
回答已采纳
1回答
R标记标题上的R闪亮数据交换输入
、、、、
我正在使用机器人手册rmdformat R Markdown模板。我的廉价医生有一些闪亮的输入。我想有一个dateRangeInput变量旁边的TOC传奇标题旁边的边。这样，用户就可以向下滚动并从文档的任何部分更改日期。这显然不起作用，但我在下面试了一下。任何帮助都将不胜感激。
title: 'shiny::dateRangeInput("riskdate", "Select Risk Date Range",start =
lubridate::today()-1825,format ="yyyy-mm-dd"
浏览 3提问于2022-02-15得票数 1
1回答
你好，我是r闪亮的新手，我正在尝试创建一个应用程序，在r中用quantmod绘制股票。
这是我的代码
library(shiny)
server = function(input, output, session) {
output$plot <- renderPlot({
data <- getSymbols(input$stock,
from = input$date[1],
to = input$date[2]
)
浏览 4提问于2020-03-22得票数 0
回答已采纳
感谢您的回答，我成功地制作了一个条形图，它根据时间单位(周、月、年)进行反应，并按时间单位收集数据(链接在这里)：
然后，我想做一个有两个变量的堆叠柱状图。对于它，我使用两个变量(例如，在我的示例中: Imported_cases和Autochthonous_cases)生成以下数据帧，并应用“melt”函数。UI在这里：
library(shiny)
library(dplyr)
library(lubridate)
library(ggplot2)
library(scales)
library(reshape2)
Disease <- data.frame(
Date = s
浏览 3提问于2017-06-26得票数 1
回答已采纳
1回答
我尝试用API从中提取数据。这是我在这里运行我的闪亮应用程序的两个文件：
ui.R
shinyUI(pageWithSidebar(
headerPanel("My Shiny APP"),
sidebarPanel(
dateRangeInput("dateRange",
label = "Select date range:",
start = Sys.Date() - 7, end = Sys.Date
浏览 2提问于2016-09-27得票数 0
回答已采纳
1回答
问题
这是我第一次写闪亮的-R。很抱歉在这件事上离得太远了。
我有一个关于泰国新冠肺炎社区移动的数据集。我想通过选择dateRangeInput和checkboxGroupInput.But创建多行图形(颜色不同)，现在我无法与input.How交互数据，我可以编写代码吗？
数据
这是我的数据结构：
数据包含日期(从15-02-20到08-01-22),6 place categories.There为7列和694行。
我现在的代码
library(shiny)
library(ggplot2)
library(shinyWidgets)
library(dslabs)
library(ti
浏览 2提问于2022-02-12得票数 2
我一直在找这个错误
错误:每当我尝试运行以下应用程序时，都找不到函数"dateRangeInput“。
server.R
library(shiny)
library(ggplot2)
library(shinyExt)
shinyServer(function(input, output, session) {
output$date <- renderText({ as.character(input$date) })
output$daterange <- renderText({ as.character(input$daterange) })
ob
浏览 1提问于2013-05-21得票数 1
回答已采纳
我使用dateRangeInput，并希望防止结束日期在开始日期之前。为此，我想利用updateDateRangeInput.
下面的代码确保结束日期是开始日期后的1天。但是，用我的解决方案，不可能修改之后的结束日期。它总是跳到开始日期的第二天。
## Only run examples in interactive R sessions
if (interactive()) {
ui <- fluidPage(
dateRangeInput("Input_Dates", label = "Date", format = "DD dd
浏览 1提问于2020-02-11得票数 0
我的问题可能很简单，但我找不到答案，我用两种疾病(Diseases_1和Disease_2)生成了一个数据监视( dataframe )，.I想要制作一个根据日期和疾病选择作出反应的条形图。PS :我收集每周的数据。我的UI在这里：
library(shiny)
library(lubridate)
library(ggplot2)
library(scales)
library(dplyr)
Surveillance <- data.frame(
Date = seq(as.Date("2015/1/1"), as.Date("2015/12/31&#
浏览 1提问于2017-06-30得票数 0
回答已采纳
我正在制作一个闪亮的应用程序来生成股票价格图。我想要生成给定日期范围的图，但是每当我试图调整日期时，我就会得到错误的“参数1不是向量”。如果我从我的应用程序中删除了"daterangeinput“部分，那么一切都很好。我已经附上了我的代码+数据。
运行下面的部分以获取数据。
library(tidyquant)
library(tidyverse)
library(shiny)
library(shinyWidgets)
library(shinythemes)
library(plotly)
sp500_names <- tq_index("SP500") %
浏览 4提问于2022-04-18得票数 1
回答已采纳
我是新来的，在R和闪亮。取决于日期范围输入的数目。我想得到每个日期范围输入的开始和结束日期，并将其存储在一个列表中。
例如：
趋势日期范围1: 2010-01-01 - 2010-12-31
趋势日期范围2: 2011-01-01 - 2011-12-31
所以当我运行Trend.List时，它会显示出来。这就是我想要实现的输出。
Trend.List [1] 2010-01 2010-12
[2] 2011-01 2011-12
我还是想在这两个日期之间计算。
我不知道如何最好的编码在R和闪亮，因为我是新的这一点。
谢谢你的帮助！
见代码
ui <-fluidPage(
浏览 3提问于2017-04-12得票数 0
回答已采纳
1回答
希望借此获得一些方向。我是新手'R‘和闪亮，并有一些编程背景，我正试图在这里申请，但没有用。本质上，我使用quantmod作为Shiny的扩展，这样我就可以绘制股票波动率。通过使用以下命令，在终端中成功实现了这一点： getSymbols(‘SPY’,from=’2007/01/01′)
vol=volatility(SPY,n=25,N=252,calc=’close’)
chartSeries(vol) 然而，当我试图将它转换成一个闪亮的应用程序，以便在web浏览器中呈现它时，我遇到了几个错误。可能使用了错误的函数？不确定..。下面是我的代码： library(quantmod)
浏览 26提问于2021-01-09得票数 1
回答已采纳
我想在dateRangeInput中将最近的3天显示为默认值。现在，Sys.Date()设置开始、结束和最大值。这是我的ui.R和server.R
ui.R
shinyUI(pageWithSidebar(
# Application title
headerPanel('dateRangeInput'),
# Sidebar with a slider input for number of observations
sidebarPanel(
wellPanel(
dateRangeInput(&#
浏览 0提问于2014-08-22得票数 1
回答已采纳
我在使用semantic.dashboard库创建一个闪亮的web应用程序时遇到了一个问题。
下面是我的应用程序的代码。
library(semantic.dashboard)
# Define UI
header <- dashboardHeader(
)
sidebar <- dashboardSidebar(
side = "left",
sidebarMenu(
menuItem(tabName = "overview", text = "Overview", icon = icon(
浏览 6提问于2018-08-25得票数 1
我正在使用来自Quantmod的股票数据，并在一个闪亮的应用程序中寻找一种使用DateRangeInput的方法，并将用户选择反映在ggplot图形中。
ui <- fluidPage(
titlePanel("Stock App"),
mainPanel(
selectInput("stock", "Select a Stock(s):", choices = unique(all_stocks_df$Stock), multiple = TRUE, selected = "AAPL"),
dat
浏览 0提问于2020-02-16得票数 0
回答已采纳
1回答
在我闪亮的应用程序的ui中，我有一个日期范围输入函数，如下所示。
dateRangeInput("dates",
"Date range",
start = "2015-01-01",
end = as.character(Sys.Date()))
然而，我希望弹出消息纠正用户，如果用户选择的开始日期晚于结束日期，而不是在应用程序中的错误。我该怎么做呢？
也可以仅允许用户选择大于例如x天的日期范围。
浏览 0提问于2015-02-25得票数 5
回答已采纳
我正在努力弄清楚如何在我闪亮的应用程序的UI中使ggplot输出响应于varSelectInput函数。例如，我希望能够选择两个不同的变量，并将它们视为彼此的函数。在本例中，我使用了航班数据集，即选择arr_time和dep_delay，在x轴上看到arr_time，在y轴上看到dep_delay。
DateRangeInput目前还没有任何功能，但我最终希望能够过滤掉在ggplot中按月绘制的结果。
library(tidyverse)
library(shiny)
flights <- nycflights13::flights
# Define UI for applicatio
浏览 1提问于2020-05-06得票数 2
回答已采纳
下面是我的代码，我无法在图表中显示数据。它只显示列名，而不显示数据。有什么建议吗？
数据只是在图表中的一行中显示，而不是正确绘制。我试过了R闪亮的小抄中的例子，但是没有成功。
budget_d <- tribble(~opdate, ~r.pd.bdgt, ~r.pt.bdgt, ~r.au.bdgt,
ymd("2018-05-31"), 81, 73, 65,
ymd("2018-06-11"), 86, 79, 69,
ymd(&#
浏览 2提问于2017-12-17得票数 1
回答已采纳
我是新来的R闪亮 我正在输入日期，并试图连接到我自己的数据。 我有一个名为performance的数据，下面是数据示例 日期A 2020-08-01 10 100 2020-09-01 15 250 2020-10-01 16 300 2020-11-01 20 350 我希望我的数据集的日期可以是反应性的，但我不太明白如何做到这一点。 这是我到目前为止得到的代码。当我运行这段代码时，会出现日期范围选择栏，但是如果我按下某个日期，它就不起作用了。 ui <- fluidPage(
title = "Performance",
dateRangeInpu
浏览 19提问于2020-11-23得票数 0
回答已采纳
我正在尝试做一个闪亮的应用程序，根据不同的日期绘制一个自定义的ggplot plot1。plot1的参数是days，它根据指定的日期绘制不同的日期。然而，我就是想不出如何集成到shiny的服务器部分。这是我最好的方法： # create sample data frame with dates
set.seed(1)
date = seq(Sys.Date(), by = "day", length.out = 30)
number = 100 * rnorm(30)
df = data.frame(date = date, number = number)
head(df)
浏览 24提问于2020-03-24得票数 1
回答已采纳
我使用app。
ui.R
shinyUI(
fluidPage(
actionButton("clear_ui", "clear_ui"),
actionButton("clear_date", "clear_date"),
uiOutput("date_ui"),
textOutput("date_text")
)
)
server.R
shinyServer(function(input, output) {
observeEvent(input$c
浏览 0提问于2020-03-06得票数 0
我在一个闪亮的应用程序上工作，在那里用户将有能力选择下拉列表中的所有选项，选项的子集，和/或单个选项。
我要使用的可重复使用的数据示例：
set.seed(42)
n <- 366
mydata <- data.frame(id=1:n,
date = seq.Date(as.Date("2020-01-01"), as.Date("2020-12-31"), "day"),
group = rep(LETTERS[1:26], n/2))
#wr
浏览 9提问于2021-12-03得票数 0
1回答
我的ui.r
library(shiny)
codes <- paste("CURRENCY:",currencies,sep="")
currencies <- c("ARS","AUD","BRL","CAD","CHF",
"CNY","DKK","EUR","GBP","IDR",
"ILS","INR"
浏览 1提问于2014-06-13得票数 0
这是一个简单的问题。我想在我的应用程序中创建一个类似于dateRangeInput的输入，但是除了YYY DD之外，我还希望它能让我从范围内选择确切的时间、分钟和秒，有什么方法可以像这样闪亮吗？我似乎在谷歌上找不到它。
我只需输入一个文本，但我喜欢dateRangeInput提供的接口
浏览 4提问于2016-08-09得票数 7
回答已采纳
我创建了一个闪亮的应用程序，它可以过滤日期和类型上的值。
问题是当我希望我的daterangeinput根据类型自动更新min/max和start/end时，输出分两个步骤进行。
我尝试重新创建一个简单的示例(请参阅下面)，但是这个问题很难发现，因为这个过程非常快，而且数据量太少。
在我的大型应用程序中，问题非常明显，因为数字被更新了两次:首先，当我更改类型时，然后在min/max日期被更新之后。
如何让我的textOutput等待输出任何东西直到daterangeInput1和2被更新？
非常感谢你的帮助，谢谢！
SERVER.R
library(shiny)
example <-
浏览 4提问于2017-03-09得票数 0
我有一个闪亮的应用程序，有许多numericInput字段。我想要一种用逗号分隔每10^3的numericInput字段格式的方法。例如，我想要5,000,000而不是5000000。
我可以在R中使用format和prettyNum函数来做这件事。但我没有办法在闪亮中做到这一点。
这将对UI非常有帮助，因为它可以处理百分比、金钱等。有人知道如何将其合并到numericInput字段中吗？
谢谢!
library(shiny)
# Define UI for application that draws a histogram
ui <- fluidPage(
mainPanel(
浏览 4提问于2018-08-11得票数 7
回答已采纳
我的server.R有以下代码，我希望我的闪亮的应用程序根据国家选择来选择国家，但它显示了第二行中的所有状态。我想在这里，observe只是观察到没有执行任何操作。
shinyServer(function(input, output, session) {
observe({
ddf = df[df$Date>=input$daterange[1] & df$Date<=input$daterange[2],]
updateSelectInput(session, "Country", choice
浏览 4提问于2013-11-19得票数 5
回答已采纳
我正在尝试设置blueprintjs DateRangeInput的区域设置。docs声明组件使用Moment.js进行本地化。所以我试着设置locale="de"，但是语言仍然是英语。有什么想法，什么是缺少得到翻译日期输入？
我对反应编程相当陌生，所以我不能确定这与我的反应技巧没有任何关系，即使是传递道具对我来说也是相当正确的。
<DateRangeInput
locale={"de"}
value={dates}
onChange={...}
/>
浏览 0提问于2018-01-19得票数 0
回答已采纳
我的问题的一个很好的例子是在电影评论示例中找到的，在这里的闪亮画廊中：
在左侧面板上有一个滑块，名为"Year Released“，范围从1940年到2014年。下面是来自ui.R的代码
sliderInput("year", "Year released", 1940, 2014, value = c(1970, 2014))
您会注意到，使用滑块时年份的格式为：
用逗号分隔第一个数字和最后三个数字的"1,940" "2,014"。
我知道可以在Shiny中使用dateRangeInput，但这需要变量采用日期格式
浏览 0提问于2014-10-30得票数 25
回答已采纳
这段代码应该向我显示昨天作为开始和结束的日期，以今天作为最后一个选项。它工作了几个月，我没有改变任何东西，但由于一些星期，我得到了错误的日期。
它显示了前天，如果我在本地运行此代码，在我的ubuntu服务器上运行rstudio，或者连接到运行此代码的闪亮服务器。
Sys.setenv(TZ='GMT')
shinyApp(
ui <- basicPage(
dateRangeInput("daterange", "Daterange",start = Sys.Date()-1
,end =
浏览 3提问于2015-10-20得票数 4
2回答
我正在尝试引用应用程序用户的多个日期范围输入。但是，每次输入的日期范围可能不同。例如，这一次我有3个经期，下一次我可能有17个经期要抓住。我应该如何对endDate进行编码，让R自动抓取最后输入的日期范围？
ui <-fluidPage(
dateRangeInput('dateRange1', label = 'period1', start = '', end = '' ),
dateRangeInput('dateRange2', label = 'period2'
浏览 1提问于2016-12-06得票数 0
我有以下基本代码：
library(quantmod); library(shiny);
ui <- fluidPage(
textInput("Symbol","Assign_Symbol","GOOG"),
dateRangeInput("Date","Assing_Date", start = Sys.Date() - 20, end = Sys.Date()),
plotOutput("Chart")
)
server <- function(input,
浏览 0提问于2019-08-28得票数 0
回答已采纳
我试图使用tippy提供悬停文本在文本的段落中，将出现在一个闪亮的应用程序中的某些单词。为了更容易地编辑指令文本的长段落，而不是将文本直接包含在闪亮的UI中，我在单独的RMarkdown文件中生成了说明，然后使用shiny::includeHTML()嵌入了相应的HTML。
提示悬停文本在呈现的HTML中很好地工作，但不会出现在闪亮的应用程序中。
直接在应用程序中调用tippy是可行的，所以这是一种选择，但如果可能的话，我更愿意将长的教学文本与应用程序文件分开。
下面的.Rmd文件(生成HTML)和app.R文件说明了这个问题。谢谢你的建议。
long_text.Rmd
---
output:
浏览 9提问于2022-07-05得票数 0
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
实时音视频
对象存储
即时通信 IM活动推荐
腾讯云开发者
