a="[aeiou]",gsub(a"+|[^"a"+|"a"[^"a"+"a,"(&)")