问题 I need to calculate the beta of a regression between two prices with: No intercept Using Total Least Squares estimate In R there is the function prcomp to perform it. After it, how can I extract the beta? the code is `library(quantmod) # how to get closes getCloses <- function(sym) { ohlc <- getSymbols(sym, from="2009-01-01", to="2011-01-01", auto.assign=FALSE, return.class="zoo") Cl(ohlc)} # how to import data (2 assets) closes <- merge(IWM=getCloses("IWM"), VXZ=getCloses("VXZ"), all=FALSE)