更改Shinymanager登录页面中的文本和颜色

更改Shinymanager登录页面中的文本和颜色,shiny,Shiny,我试图用我的脚本中的html代码更改shinymanager在R中的登录页面中的文本,但它不起作用。例如,我想通过“usuario”更改用户名和框架的颜色。有人知道怎么做吗?谢谢,这是我的密码 library(shiny) library(ggplot2) library(shinydashboard) library(DT) library(dplyr) library(shinyWidgets) library(data.table) library(png) library(shinyj

我试图用我的脚本中的html代码更改shinymanager在R中的登录页面中的文本,但它不起作用。例如,我想通过“usuario”更改用户名和框架的颜色。有人知道怎么做吗?谢谢,这是我的密码

library(shiny)
library(ggplot2)
library(shinydashboard)
library(DT)
library(dplyr)
library(shinyWidgets)
library(data.table)
library(png) 
library(shinyjs)
library(shinythemes)
library(shinycssloaders)
library(sodium)
library(lubridate)
library(glue)
library(shinymanager)

## estructura shiny ##

inactivity <- "function idleTimer() {
var t = setTimeout(logout, 120000);
window.onmousemove = resetTimer; // catches mouse movements
window.onmousedown = resetTimer; // catches mouse movements
window.onclick = resetTimer;     // catches mouse clicks
window.onscroll = resetTimer;    // catches scrolling
window.onkeypress = resetTimer;  //catches keyboard actions

function logout() {
window.close();  //close the window
}

function resetTimer() {
clearTimeout(t);
t = setTimeout(logout, 120000);  // time is in milliseconds (1000 is 1 second)
}
}
idleTimer();"

ui <- secure_app(

    head_auth = tags$script(inactivity),...
    (normal ui code), 
    )

server <- function(input, output, session) {

    result_auth <- secure_server(check_credentials = check_credentials(credentials)),...
    (normal server code),
    }

shinyApp(ui = ui, server = server)

库(闪亮)
图书馆(GG2)
图书馆(shinydashboard)
图书馆(DT)
图书馆(dplyr)
图书馆(shinyWidgets)
库(数据表)
图书馆(png)
图书馆(shinyjs)
图书馆(shinythemes)
图书馆(shinycssloaders)
图书馆(钠)
图书馆(lubridate)
图书馆(胶水)
图书馆(shinymanager)
##有光泽的雌蕊##
不活动Hi-Nico

您可以使用
secure\u app
中的参数主题更改{shinymanager}使用的主题,您可以使用或创建自定义主题

更改标签目前还不是导出的功能,但您可以执行以下操作:

lang <- shinymanager:::language$new()
lang$add(
  "Please authenticate" = "Por favor autenticar",
  "Username:" = "Usuario:",
  "Password:" = "Contraseña:",
  "Login" = "Iniciar sesión"
)
你好,尼科

您可以使用
secure\u app
中的参数主题更改{shinymanager}使用的主题,您可以使用或创建自定义主题

更改标签目前还不是导出的功能,但您可以执行以下操作:

lang <- shinymanager:::language$new()
lang$add(
  "Please authenticate" = "Por favor autenticar",
  "Username:" = "Usuario:",
  "Password:" = "Contraseña:",
  "Login" = "Iniciar sesión"
)

到目前为止你做了什么?请提供您所做的代码,以便我们可以帮助您嗨!我用我的部分代码更新了帖子,谢谢!到目前为止你做了什么?请提供您所做的代码,以便我们可以帮助您嗨!我用我的部分代码更新了帖子,谢谢!非常感谢你!这非常适合我的应用程序。。。你知道人们是否可以在日志页面中插入图像或标题吗?我是使用shiny和shinymanager的新手,所以欢迎任何帮助!再次感谢。是的,您可以使用
tag\u img
参数添加图像,我编辑了我的答案。谢谢!那正是我要找的东西。你知道一个学习闪亮的好来源,但是从开发者的角度来说?我的意思是使用html或javascript中的代码?再次感谢您的帮助。当尝试更改语言时,我收到错误:
错误在..stacktraceon({:尝试应用非功能
@Jabro标签现在可以使用
set_labels
功能设置,而不是使用这里给出的示例。非常感谢!这非常适合我的应用程序…你知道是否可以在loggin页面中插入图像或标题吗?我使用shiny和shinymanager有点新,因此欢迎任何帮助!再次感谢在中。是的,您可以使用
tag\u img
参数添加图像,我编辑了我的答案。谢谢!这正是我要找的。您知道一个学习shiny的好来源,但从开发人员的角度来看?我的意思是使用html或javascript中的代码?再次感谢您的帮助。当尝试更改语言时,我得到错误:
错误在。。stacktraceon.({:尝试应用非功能
@Jabro标签现在可以使用
set_labels
功能设置,而不是使用此处给出的示例。