jquery - 在 Shiny 中使用本地语言文件进行 DataTables 国际化
问题描述
我想在提供的国际化文件的帮助下将我的数据表翻译成闪亮的,但不是链接到网站,我需要链接我的计算机上的文件(没有互联网连接的虚拟机)我怎样才能做到这一点?
我尝试按照此处的步骤https://rstudio.github.io/DT/004-i18n.html但没有使用“ http://cdn.datatables.net/plug-ins/1.10.19/i18n/French .json ”,我尝试使用“file:///www/French.json”但没有成功
这是我的代码
library(DT)
ui <- basicPage(
DT::dataTableOutput("mytable")
)
server <- function(input, output) {
output$mytable = DT::renderDataTable(
mtcars,
options = list(
language = list(url = "file:///www/French.json")
))
}
shinyApp(ui, server)
编辑:我试过这个没有运气
language = list({
"language": {
"sProcessing": "Traitement en cours ...",
"sLengthMenu": "Afficher _MENU_ lignes",
"sZeroRecords": "Aucun résultat trouvé",
"sEmptyTable": "Aucune donnée disponible",
"sInfo": "Lignes _START_ à _END_ sur _TOTAL_",
"sInfoEmpty": "Aucune ligne affichée",
"sInfoFiltered": "(Filtrer un maximum de_MAX_)",
"sInfoPostFix": "",
"sSearch": "Chercher:",
"sUrl": "",
"sInfoThousands": ",",
"sLoadingRecords": "Chargement...",
"oPaginate": {
"sFirst": "Premier", "sLast": "Dernier", "sNext": "Suivant", "sPrevious": "Précédent"
},
"oAria": {
"sSortAscending": ": Trier par ordre croissant", "sSortDescending": ": Trier par ordre décroissant"
}
}
})
解决方案
在 R 中,您可以list
直接使用 a :
fr <- list(
sProcessing = "Traitement en cours...", sSearch = "Rechercher :",
sLengthMenu = "Afficher _MENU_ éléments",
sInfo = "Affichage de l'élément _START_ à _END_ sur _TOTAL_ éléments",
sInfoEmpty = "Affichage de l'élément 0 à 0 sur 0 élément",
sInfoFiltered = "(filtré de _MAX_ éléments au total)",
sInfoPostFix = "", sLoadingRecords = "Chargement en cours...",
sZeroRecords = "Aucun élément à afficher",
sEmptyTable = "Aucune donnée disponible dans le tableau",
oPaginate = list(
sFirst = "Premier", sPrevious = "Précédent",
sNext = "Suivant", sLast = "Dernier"
),
oAria = list(
sSortAscending = ": activer pour trier la colonne par ordre croissant",
sSortDescending = ": activer pour trier la colonne par ordre décroissant"
)
)
library(DT)
library(shiny)
ui <- basicPage(
DT::DTOutput("mytable")
)
server <- function(input, output) {
output$mytable = DT::renderDT({
mtcars
},
options = list(
language = fr
))
}
shinyApp(ui, server)
如果您想使用此处提供的 JSON ,请将其下载到您的www
文件夹并使用:
language = list(url = "French.json") # without www/
推荐阅读
- php - 'Tymon\JWTAuth\Middleware\GetUserFromToken' 在哪里
- java - 为什么我的链接在测试期间需要双击,但手动单击?
- apache - 无法在一个 dockerfile 中安装带有闪亮应用程序的 apache+php
- vb.net - 逐个字符地手动编辑 PDF 的 Unicode 字符映射
- excel - 如何使用officejs在excel中显示范围选择输入对话框
- javascript - 如何遍历 2 个数组以创建新的键/值对象
- android - 如何让多个文本打开不同的活动页面
- php - CKEditor 反斜杠
- python - 将收入映射到二进制
- flutter - CustomPaint 用动画指示重绘