导出拟合值

Question

我使用此处显示的示例运行20个单独的回归-

B1<-rq(ASYS~AB1, tau=c(0.99,0.50))    
B2<-rq(ASYS~AB2, tau=c(0.99,0.50))    
B3<-rq(ASYS~AB3, tau=c(0.99,0.50)) 
B4<-rq(ASYS~AB4, tau=c(0.99,0.50))  
B5<-rq(ASYS~AB5, tau=c(0.99,0.50))

然后，我为每个回归获得了拟合模型。现在，我想将20个回归的所有拟合值导出到一张Excel工作表中。有办法吗？