ui <- fluidPage(
...
tags$script(
HTML(
"$(document).on('click', '>tabPanelid<', function(e) {
ga('send', 'event', 'TabsetPanel', 'Tab Viewed', $(this).attr('data-value'));
});"
)
),
...
)
我不知道什么是matomo,但这是如何跟踪活动选项卡。 当您做
tabsetPanel(tabPanel("THE TAB ID", tags$span(2)))
时,这会产生此HTML代码:
<div class="tabbable">
<ul class="nav nav-tabs" data-tabsetid="2677">
<li class="active">
<a href="#tab-2677-1" data-toggle="tab" data-bs-toggle="tab" data-value="THE TAB ID">THE TAB ID</a>
</li>
</ul>
<div class="tab-content" data-tabsetid="2677">
<div class="tab-pane active" data-value="THE TAB ID" id="tab-2677-1">
<span>2</span>
</div>
</div>
</div>
这是一些bootstrap3
东西。您必须在带有属性shown.bs.tab
元素上收听事件data-toggle="tab"
data-value
还有其他选项卡事件:$("a[data-toggle='tab']").on("shown.bs.tab", function(e) {
var tabId = $(e.target).data("value");
alert(tabId);
});