Número de vezes que um caractere aparece

Crie uma função que retorne quantas vezes um caractere aparece em cada palavra de uma frase. Considere as formas maiúscula e minúscula da mesma letra como idênticas.

Exemplos

Program.CharAppears("She sells sea shells by the seashore.", 's') ➞ [1, 2, 1, 2, 0, 0, 2]

Program.CharAppears("Peter Piper picked a peck of pickled peppers.", 'P') ➞ [1, 2, 1, 0, 1, 0, 1, 3]