我正在构建一个闪亮的应用程序中的程序行选择'功能'。用户通过单击地图来删除标记,并且渲染的数据表显示有关标记的信息。当用户单击现有标记时,将选择数据表中的适用条目(默认情况下会突出显示)。
我发现在使用rownames=FALSE
时,似乎禁用了编程行选择功能。只要不使用此选项,它就可以正常工作,但是后来我得到了数据表中显示的rownames列的不良效果。想知道我做错了什么......
在下面的代码中,rv$markers
是一个存储有关标记信息的反应变量。 selectedMarker
是与点击标记对应的rv$markers
行的row.name。
updateMarkerList <- function(selectedMarker=NULL) {
output$markerList <- DT::renderDataTable(
expr = {
if(!(nrow(rv$markers))) return() # No rendering if no markers
data <- rv$markers[,c("id","lat","lng","juris")]
data
},
selection=list(mode='single', selected=as.character(selectedMarker)),
#rownames=FALSE #rows will not be selected when markers are clicked if this is "on"
style="bootstrap",
class="compact",
caption='Marker List',
options=list(dom='tp'),
colnames=c("ID","Lat","Lon","City")
)
}