所以我是CSS的新手,我正在尝试弄清楚如何将其纳入R.我昨天有这个部分工作,我不知道我做了什么从那以后搞砸了。该程序本身工作正常我只能使CSS工作,除了行.tableinput-container
和.data
。
shinyUI(navbarPage("Stats",
tabPanel("Data",
tags$head(
tags$style(type = "text/css"
, ".navbar-inner{background-color: rgb(202,202,202); background-image: none; font-family: Arial; font-size: small; }"
, ".navbar .brand {background-color: default color: default; font-family: Arial; color: black;}"
, "table.data {width: 300px; border-color: black;}"
, ".well {width: 80%; background-color: NULL; border: 0px solid rgb(255, 255, 255); box-shadow: 0px 0px 0px rgb(255, 255, 255) inset;}"
, ".tableinput .hide {display: table-header-group; background-color: rgb(204,204,204); align-items: center; text-align: center; align-self: center;}"
, ".tableinput-container {width: 100%; text-align: center;}"
, ".tableinput-buttons {margin: 10px;}"
, ".data {background-color: rgb(255,255,255);}"
, ".table th, .table td {text-align: center; border-color:black;}"
)),
matrixInput('data', 'Add Rows', data.frame("A"="","B"="","C"="","D"=""))
),
答案 0 :(得分:0)
我已经为过去的每一行做了一个新的标签$ style()调用...也许尝试一下。以下是我的一个闪亮应用程序的示例:
sidebarPanel(
tags$head(
tags$link(rel="stylesheet", type="text/css", href="css/styles.css"),
tags$script(type = 'text/javascript', src = 'js/responsiveTable.js'),
tags$style(type="text/css", "label.radio { display: inline-block; }", ".radio input[type=\"radio\"] { float: none; }"),
tags$style(type="text/css", "select { max-width: 200px; }"),
tags$style(type="text/css", "textarea { max-width: 185px; }"),
tags$style(type="text/css", ".jslider { max-width: 200px; }"),
tags$style(type='text/css', ".well { padding: 12px; margin-bottom: 5px; max-width: 280px; }"),
tags$style(type='text/css', ".span4 { max-width: 280px; }")
),