無法為R中的回歸分析編程循環

我的R代碼有問題。我想運行大約100個回歸，并用一個循環執行這個過程。我試著用YouTube之類的幫助自己編寫這個循環，但是一無所獲。因此，我想問你是否能幫助我。具體來說，我有一個100家Nasdaq100公司的數據集，我想按季度將每股銷售額與股價表現進行回歸。另一個問題是，數據集包含這100家公司，必須為每個附加公司創建一個帶有相應股票代碼的子集，以便R可以為每個回歸正確訪問它。

以下是代碼摘錄：

Nasdaq_100 = read_xlsx("Nasdaq_100_Sales_Data.xlsx")

#Correlation between quarterly close price and Sales of AMD
AMD <- subset (Nasdaq_100, Nasdaq_100$TickerSymbol=="AMD")
AMD_regression = lm(AMD$Sales ~ AMD$Stockprice_quarterly, data = Nasdaq_100)
summary(AMD_regression)

你能幫我把這個循環編程成回歸分析嗎？

提前感謝您的幫助！