adb pull $(adb shell uiautomator dump | grep -oP '[^ ]+.xml') /tmp/view.xml
Откройте /tmp/view.xml
в веб-браузере, например:
google-chrome /tmp/view.xml
adb exec-out uiautomator dump / dev / tty
blockquote>из другого ответа не работал для меня.
Одна dplyr
возможность может быть:
df %>%
group_by(grp = cut(CUSTOMER_AGE,
breaks = c(18, 29, 44, 59, Inf),
labels = c("18-29", "30-44", "45-59", "60+"),
right = FALSE)) %>%
summarise(res = (length(ACCOUNT_TYPE[ACCOUNT_TYPE == "Credit_Card"])/n()*100))
grp res
<fct> <dbl>
1 18-29 50
2 30-44 100
Пример данных:
df <- read.table(text = "CUSTOMER_NUMBER CUSTOMER_AGE ACCOUNT_NUMBER ACCOUNT_TYPE
123 27 A987 Home_Loan
123 27 B6547 Credit_Card
124 42 B7531 Credit_Card", header = TRUE,
stringsAsFactors = FALSE)