Форум врачей-аспирантов

Здравствуйте, гость ( Вход | Регистрация )

> Рандомизация в программе Statistica
ЛенвГо ошко
сообщение 11.02.2018 - 14:41
Сообщение #1





Группа: Пользователи
Сообщений: 5
Регистрация: 10.02.2018
Пользователь №: 30973



Добрый день всем участникам форума! Буду очень благодарна, если кто-нибудь поможет мне с решением типовой практической задачи. Имеется выборка из 24 пациентов. Она будет разделена на 2 группы по 12 человек. 12 человек из первой группы в первом периоде исследования будут получать лекарственное средство T, во втором периоде - лекарственное средство R. 12 человек из второй группы в первом периоде исследования будут получать лекарственное средство R, во втором периоде - лекарственное средство T. Мне необходимо с использованием программы Statistica (у меня стоит пробная версия 13) случайным образом распределить 24 человека на 2 группы по 12 (последовательности лечения TR и RT). Подскажите, пожалуйста, как это делается.
Вернуться в начало страницы
 
+Ответить с цитированием данного сообщения
 
 
Открыть тему
Ответов
DrgLena
сообщение 12.02.2018 - 15:07
Сообщение #2





Группа: Пользователи
Сообщений: 1325
Регистрация: 27.11.2007
Пользователь №: 4573



Задвоение таки да, проблема, не позволяющая использовать on line ресурсы типа:
https://www.randomizer.org/
https://www.random.org/integers/
Программа Statistica из списка 24 объектов отбирает 12 без задвоений, но после этого нужно руками проставлять этим номерам первую группу, а не попавшим в этот список - вторую группу, не удобно, а если групп 3 все еще труднее. Вариант , описанный nokh также без задвоений, но с элементами ручной работы.
А потому, стоит согласиться с ogurtsov, лучше использовать специальные пакеты, тем более, что редакции некоторых научных журналов задают вопросы о методах радомизации, а в специальных пакетах их реализовано очень много, в randomizeR - 15. Я выполнила RAR (Random Allocation Rule) для этой задачке.
https://cran.r-project.org/web/packages/ran...izeR/index.html

> library (randomizeR)
> N <-24
> K <-2
> groups <-c("A", "B")
> rarPar(N, K, groups=groups)
Object of class "rarPar"
design = RAR
N = 24
groups = A B
> groups <-c("A", "B")
> par <-rarPar(N ,K, groups=groups)
> R <-genSeq(par)
> getRandList®
[,1] [,2] [,3] [,4] [,5] [,6] [,7] [,8] [,9] [,10] [,11] [,12] [,13] [,14]
[1,] "A" "A" "B" "A" "A" "B" "A" "B" "A" "A" "B" "A" "B" "B"
[,15] [,16] [,17] [,18] [,19] [,20] [,21] [,22] [,23] [,24]
[1,] "A" "B" "B" "A" "B" "A" "B" "B" "A" "B"
> saveRand(R, file="D:/R/mylist.doc.csv")

Или просто отчет, там понятней, какому номеру какое лечение.
> This document was generated on Вт фев 13 2018 at 0:03:20 .
The randomizeR package of version 1.4 was used for generating the randomization list with the R version 3.4.3 (2017-11-30) .
Randomization Method: RAR
seed: 967519
N: 24
K: 2
ratio: 1, 1
groups: A, B

Legend:
N := number of included patients
K := number of treatment groups
ratio := allocation ratio of the trial
groups := names for the investigated groups
For specific randomization parameters see the help of the randomizeR package.

"Allocation" "Treatment"
1 "A"
2 "A"
3 "B"
4 "A"
5 "A"
6 "B"
7 "A"
8 "B"
9 "A"
10 "A"
11 "B"
12 "A"
13 "B"
14 "B"
15 "A"
16 "B"
17 "B"
18 "A"
19 "B"
20 "A"
21 "B"
22 "B"
23 "A"
24 "B"
Вернуться в начало страницы
 
+Ответить с цитированием данного сообщения
 

Сообщений в этой теме
- ЛенвГо ошко   Рандомизация в программе Statistica   11.02.2018 - 14:41
- - nokh   У меня есть заготовка с ответом из выходящего в эт...   11.02.2018 - 16:02
|- - ЛенвГо ошко   Цитата(nokh @ 11.02.2018 - 16:02) У ...   11.02.2018 - 16:21
|- - nokh   Цитата(ЛенвГо ошко @ 11.02.2018 - 18...   12.02.2018 - 04:44
- - 100$   Цитата(ЛенвГо ошко @ 11.02.2018 - 14...   11.02.2018 - 16:34
|- - ogurtsov   Цитата(100$ @ 11.02.2018 - 17:3...   11.02.2018 - 22:06
|- - 100$   Цитата(ogurtsov @ 11.02.2018 - 22:06...   12.02.2018 - 00:08
- - DrgLena   Вряд ли рандомизация 24 больных может гарантироват...   12.02.2018 - 01:19
- - DrgLena   Задвоение таки да, проблема, не позволяющая исполь...   12.02.2018 - 15:07
- - passant   Цитата(nokh @ 11.02.2018 - 16:02) У ...   12.02.2018 - 16:39
|- - 100$   Del   12.02.2018 - 16:55
|- - nokh   Цитата(passant @ 12.02.2018 - 18:39)...   12.02.2018 - 23:13
- - passant   Цитата(100$ @ 12.02.2018 - 16:5...   12.02.2018 - 17:11
|- - 100$   Del   12.02.2018 - 23:09
- - DrgLena   http://forum.disser.ru/?showtopic=1215 плав о блоч...   13.02.2018 - 07:46
- - ЛенвГо ошко   Добрый день. Всем спасибо за мнение по вопросу. По...   13.02.2018 - 15:20
|- - DoctorStat   Цитата(ЛенвГо ошко @ 13.02.2018 - 15...   13.02.2018 - 20:23
- - DrgLena   В программе Statistica тоже есть функция random sa...   13.02.2018 - 23:16
|- - ЛенвГо ошко   Цитата(DrgLena @ 13.02.2018 - 23:16)...   17.02.2018 - 14:20
- - DrgLena   Для nokh и других, которые хотят учиться, а не отп...   14.02.2018 - 03:08
|- - 100$   Del   14.02.2018 - 13:10
- - DrgLena   Цитата(100$ @ 14.02.2018 - 14:1...   14.02.2018 - 14:45
|- - 100$   Del   14.02.2018 - 16:31
- - DrgLena   Del   14.02.2018 - 21:28
|- - 100$   Del   14.02.2018 - 23:26
- - DrgLena   Del   15.02.2018 - 00:00
- - passant   Цитата(DrgLena @ 15.02.2018 - 00:00)...   15.02.2018 - 13:00
|- - 100$   Del   15.02.2018 - 14:40
|- - nokh   Цитата(passant @ 15.02.2018 - 15:00)...   15.02.2018 - 14:52
|- - 100$   Del   15.02.2018 - 16:44
- - DrgLena   Del   16.02.2018 - 01:18
|- - 100$   Цитата(DrgLena @ 16.02.2018 - 01:18)...   16.02.2018 - 11:15
- - DrgLena   Цитата(100$ @ 16.02.2018 - 12:1...   16.02.2018 - 23:56
- - DrgLena   Цитата(ЛенвГо ошко @ 17.02.2018 - 14...   18.02.2018 - 04:00
|- - ЛенвГо ошко   Цитата(DrgLena @ 18.02.2018 - 04:00)...   18.02.2018 - 14:09
- - DrgLena   Цитата(ЛенвГо ошко @ 18.02.2018 - 15...   19.02.2018 - 09:28


Добавить ответ в эту темуОткрыть тему