在对连续型变量的查看中发现数据极端值，
在R中如何取原数据的5%-95%，并重新编码为新变量呢？