如何找到采样元素的位置？

Question

我已经定义了一个向量

import csv, string, nltk
def process_rs():
    with open('rs1.csv') as f:
       reader = csv.reader(f)
       next(reader, None)
       global raw_text
       with open('raw_reqs.txt', 'w', encoding = 'utf-8') as f1:
          for row in reader:
              raw_text = ('"'+' '.join(row)+'.'+'"'+', ')
              f1.write(raw_text)
              print(raw_text)
process_rs()

并运行示例函数

x<-rep(10,times=10)

，当然，它将显示10的结果，但是我想知道该元素在原始矢量x中的位置（从元素被采样的位置开始）。我们如何找到它？而且，我有什么方法可以用任何其他数字替换该采样元素？

Answer 1

一种解决方法是命名x的元素：

x <- rep(10,times=10)
names(x) <- letters[seq_along(x)]
which(names(x) == names(sample(x,1,replace=TRUE)))