la función split es lo que necesitas. Le tienes que dar un factor para que sepa comocómo agrupar, por ejemplo:
split(c(1,2,3,4),c(1,2,2,1))
regresa una lista con 1 y 4 en la primera entrada y luego 2 y 3.
Para tu problema la función cumsum nos ayuda a crear el factor que se necesita cumsum(x=="a")
crea el factor que se necesita.
Luego tienes que asegurarte de eliminar las "a" para que no sean incluidas en la lista, y una vez eliminadas conviene convertir a enteros con as.integer:
<b>
split(as.numericinteger(x[x!="a"]),cumsum(x=="a")[x!="a"])