Necesito encontrar el número después de la cadena "Count of". Podría haber un espacio o un símbolo entre la cadena "Count of" y el número. Tengo algo que funciona en www.regex101.com pero no funciona con stringrstr_extract función.

library(stringr)

shopping_list <- c("apples x4", "bag of flour", "bag of sugar", "milk x2", "monkey coconut 3oz count of 5", "monkey coconut count of 50", "chicken Count Of-10")
str_extract(shopping_list, "count of ([\\d]+)")
[1] NA NA NA NA "count of 5" "count of 50" NA

Lo que quiero obtener:

[1] NA NA NA NA "5" "50" "10"