当用户更改输入名称=“qty”并在该元素上显示bootstrap工具提示时,我需要找到最接近的元素fa-retweet ...
我尝试使用代码:
> library(dplyr)
> library(purrr)
>
> def_nested_df <- function(x) {
data_frame("covariate" = x,
"data" = list(iris %>% tbl_df %>%
select_("response" = "Sepal.Length",
"predictor" = x)))
}
>
> nested_df <-
c("Sepal.Width", "Petal.Length", "Petal.Width") %>%
map_df(def_nested_df)
>
> nested_df
# A tibble: 3 × 2
covariate data
<chr> <list>
1 Sepal.Width <tibble [150 × 2]>
2 Petal.Length <tibble [150 × 2]>
3 Petal.Width <tibble [150 × 2]>
>
> nested_df[[1, "data"]]
# A tibble: 150 × 2
response predictor
<dbl> <dbl>
1 5.1 3.5
2 4.9 3.0
3 4.7 3.2
4 4.6 3.1
5 5.0 3.6
6 5.4 3.9
7 4.6 3.4
8 5.0 3.4
9 4.4 2.9
10 4.9 3.1
# ... with 140 more rows
但没有任何事情发生。请帮忙。
使用完整的HTML代码更新:
$('input[name=qty]').change(function() {
$(this).closest('.fa-retweet').tooltip('show');
});
答案 0 :(得分:0)