Как мне выбрать и провести случайный тест перестановки для данных с неравной длиной списка в R?

Question

У меня проблема с двумя списками неравной длины, и я хочу провести случайный тест перестановки, состоящий из 5000 итераций, чтобы выяснить, значительна ли разница в средних для обоих.

dataset1v <- c(10, 10, 5, 10, 50, 2, 5, 50, 10, 40, 50, 20, 25, 20, 10, 10, 50, 10)
dataset2v <- c(50, 10, 20, 10, 40, 10, 20, 30, 10, 10, 80, 15)

Все учебники по тестам случайной перестановки предполагают одинаковую длину списка, и поэтому они не применяются, так как появляется предупреждение, когда я запускаю его со своими списками. Я пробовал permutation.test.discrete среди других вариантов, но это всегда та же проблема: длина списка не одинакова. Кроме того, я также хотел бы пересчитать каждые данные в их исходные длины списка (18 и 12 каждый). Я новичок в программировании для R, поэтому я часами пытался понять, как решить эту проблему. Был бы признателен за помощь и указатели в правильном направлении! Спасибо !!

Answer 1

Вы можете использовать twot.permutation из пакета DAAG.

library("DAAG")
set.seed(42)
twot.permutation(dataset1v, dataset2v, nsim=5e3)
# [1] 0.605

Также имеется функция построения графиков:

---

Данные

dataset1v <- c(10, 10, 5, 10, 50, 2, 5, 50, 10, 40, 50, 20, 25, 20, 10, 10, 50, 10)
dataset2v <- c(50, 10, 20, 10, 40, 10, 20, 30, 10, 10, 80, 15)