Gated Recurrent Unit的R语言实现