从矩阵的随机行选择的剩余数据中创建一个矩阵，并使用数据计算R中的RMSE

我有一个矩阵[a]，有42行2列。然后我有一个函数，随机选择其中12行，对随机选择的矩阵进行线性回归，并输出线性回归的系数（斜率和截距）

在R中，我想从原始矩阵中获得在随机函数中没有选择的其他30行，然后将这些数据与我新计算的系数一起使用，生成一个点（y值）。因此，我将有30个y值，然后从那里我想使用新的y值和新的30行矩阵中的1列来计算RMSE（）

下面的代码是我目前拥有的代码：

#Calibration Equation 1 (TC OFF)

---

A

A注意，如果A中有重复的行，则需要一个方法来处理重复的行。谢谢您的回答。在选择矩阵中的其他行时，这正是我想要的。你能帮我回答问题的第二部分吗，我现在需要使用这个新矩阵，然后使用以前计算的系数计算一些新值？谢谢您好@Jason，在这个论坛中，通常当有两个问题时，您应该将它们作为两个独立的问题发布，因为这可以作为将来可能搜索这些问题的其他人的参考
B<- A[sample(42,12),]
lm(B[,2] ~ B[,1])$coefficients

arows <- apply(A, 1, paste, collapse="_")
brows <- apply(B, 1, paste, collapse="_")
A[-match(brows, arows), ]

library(data.table)
A <- as.data.table(A)

B <- A[sample(nrow(A), 12)]

setkey(A)
setkey(B)
A[!B]