在開發(fā)shiny工具過程中遇到一個問題响巢，想讓文本輸入框中的內(nèi)容不換行，
查找到棒妨，需要在textarea標簽中加上warp='off'屬性
右邊 wrap=off
嘗試一textAreaInput失敗
嘗試使用tagAppendAttributes 函數(shù)加屬性踪古，但好像加到div上去了，
翻閱textAreaInput的參數(shù)券腔，也沒有wrap參數(shù)伏穆。
> textAreaInput('inputtext',label = '輸入數(shù)據(jù)', height = 300,value = 'longtetx') %>%
+ shiny::tagAppendAttributes(wrap="off")
<div class="form-group shiny-input-container" wrap="off">
<label for="inputtext">輸入數(shù)據(jù)</label>
<textarea id="inputtext" class="form-control" style=" height: 300px; ">longtetx</textarea>
</div>
嘗試二tags$textarea可行
使用tags手動寫組件，并加上相應的屬性纷纫，其實也可以用HTML('code')枕扫，使用文本的方式寫html代碼。還有記住id屬性就可以了辱魁。
>tags$div(class="form-group shiny-input-container",tags$label(`for`="inputtext",'輸入數(shù)據(jù)'),
+ tags$textarea(id="inputtext",class="form-control",wrap="off",style=" height: 300px;",'longtext'))
<div class="form-group shiny-input-container">
<label for="inputtext">輸入數(shù)據(jù)</label>
<textarea id="inputtext" class="form-control" wrap="off" style=" height: 300px;">longtext</textarea>
</div>
嘗試三JS比較繁瑣
嘗試過使用js,但也只能在加載頁面烟瞧，或掉用JS的時候有效。使用比較麻煩
shinyjs::run_js('document.getElementsByTagName("textarea")[0].setAttribute("wrap", "off");')
最新可視化工具箱 20190529商叹，
http://qplot.cn/toolbox/
