更改R閃亮的控件輸入文本大小

Question

所以我有numInputs，並且我想要更改實際出現在文本框內的數字的文本大小。

我該怎麼做到這一點？

Answer 1

@warmoverflow說最簡單的方法就是使用CSS。以下是將一些CSS添加到窗口小部件的兩個示例，第一個將僅應用於具有指定id的元素，第二個將用於所有類型爲number的元素。我假設它是numericInput而不是numInputs，但它應該適用於任何其他輸入小部件。

選項1.更改CSS爲特定元件

runApp(list(
    ui = shinyUI(fluidPage(
    tags$style("#myNumericInput {font-size:50px;height:50px;}"), 
    numericInput("myNumericInput", "Observations:", 10, min = 1, max = 100), 
    numericInput("otherNumericInput", "Observations 2:", 10, min = 1, max = 100) 
)), 
    server = shinyServer(function(input, output, session) { 
    }) 
)) 

選項2變遷number類型的所有元素的CSS。

runApp(list(
    ui = shinyUI(fluidPage(
    tags$style("[type = 'number'] {font-size:50px;height:50px;}"), 
    numericInput("myNumericInput", "Observations:", 10, min = 1, max = 100), 
    numericInput("otherNumericInput", "Observations 2:", 10, min = 1, max = 100) 
)), 
    server = shinyServer(function(input, output, session) { 
    }) 
)) 

請注意，除了改變字體大小，我也改變了喚起注意，這是爲了確保該框將大到足以表現出不同尺寸的數量。

此外，您可以考慮使用單獨的.css文件來放置所有自定義樣式。

Answer 2

謝謝，我只是把

input[type="number"] { 
    font-size: 18px; 
} 

到我的CSS標題樣式標籤和它的工作。

Answer 3

只是一般的注意，可能是有趣的人訪問這個帖子：

事實證明，如果你的inputId中有一個.的tags$style('#inputId {}')方法是行不通的。

• 例如：下面的不會改變輸入文本的文字大小：

  tags$style("#myNumeric.Input {font-size:8px;}"), 
  numericInput("myNumeric.Input", "Observations:", 10, min = 1, max = 100) 
  

  ...但預期了以下工作：

  tags$style("#myNumericInput {font-size:8px;}"), 
  numericInput("myNumericInput", "Observations:", 10, min = 1, max = 100) 
  

  • 注意：_在inputId名稱中正常工作。

如果你堅持你的inputId名保持.，嘗試直接添加樣式參數到你的輸入函數：

numericInput("myNumeric.Input", "Observations:", 10, min = 1, max = 100, 
       style = "font-size:8px;")