Question

我正在尝试编写一个函数，它将随机选择存储在向量x中的大约一半实验单位，将它们分配给treatment1和treatment2。输出应显示分配给两种处理中每种处理的矢量条目。

我的代码似乎“有效”，但我不确定我是否应该使用“矩阵”，或者我实际上是否正确地执行此操作。我的代码如下：

myfunction <- function(x) {
      df.1 <- data.frame(matrix(x, nrow = length(x)/2))
      names(df.1) <- gsub("X", "Treatment", names(df.1), fixed = "TRUE")
      return(sample(df.1))
    }

Answer 1

如果我读得正确，你需要try { while (!Thread.currentThread().isInterrupted() && /* more work to do */) { // do more work Thread.sleep(1000); } } catch (InterruptedException e) { // thread was interrupted during sleep or wait }上两个大小相等的数据分区。这很简单：

data.frame

或者对于矢量：

partition <- function(df, replace= FALSE, seed= 512L) {
  set.seed(seed)
  s <- sample(1:nrow(df), size= floor(nrow(df) / 2), replace= replace)
  return(list(df[s,], df[-s,]))
}

# example:
data(mtcars)
partition(mtcars)

R代码用于选择存储在向量x中的一半实验单位的函数

1 个答案: