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

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

> Есть ли ЗДЕСЬ смысл в рассчёте ДИ?
Liz
сообщение 21.01.2012 - 16:28
Сообщение #1





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



Количества (непересекающихся) осложнений ("a", "b", "c", "e") от лечения (в группе из двадцати пациентов) следующие:
"a" 7(35%) пациентов,
"b" 5(25%) п-ов,
"c" 5(25%) п-ов,
"e" 3(15%) п-ов.

1. ИМЕЕТ ЛИ СМЫСЛ расчёт ДИ В ПОДОБНОГО РОДА СЛУЧАЯХ?

2. Оn-line медкалькулятор позволяет посчитать ДИ в предположении, что исходная группа разбита на две части (два осложнения). Чтобы получить ДИ-лы для четырёх групп, приходится подставлять данные ЧЕТЫРЕ раза последовательно (КАЖДЫЙ РАЗ предполагая, что разбиений/осложнений/ два).
ВОПРОС: НЕ ПРИВОДИТ ЛИ ЭТО К ОШИБКАМ по причине "неучёта множественности"? Спасибо!
P.S. результат: А 7(35%; 95%ДИ, 15-59% ), Б 5(25%; 95%ДИ, 9-49%), С 5(25%; 95%ДИ, 9-49%), Е 3(15%; 95%ДИ, 3-39%).

Сообщение отредактировал Liz - 23.01.2012 - 20:33
Вернуться в начало страницы
 
+Ответить с цитированием данного сообщения
 
 
Открыть тему
Ответов
Liz
сообщение 21.01.2012 - 23:41
Сообщение #2





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



<а что за калькулятор?>
http://home.ubalt.edu/ntsbarsh/Business-st.../ConfIntPro.htm
Вернуться в начало страницы
 
+Ответить с цитированием данного сообщения
 
p2004r
сообщение 22.01.2012 - 00:42
Сообщение #3





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



Цитата(Liz @ 21.01.2012 - 23:41) *
<а что за калькулятор?>
http://home.ubalt.edu/ntsbarsh/Business-st.../ConfIntPro.htm


вообще то все правильно считает, это я зря выборку увеличил frown.gif мда, пора как говорится спать smile.gif

Код
> res<-t(replicate(30000,as.vector(table(factor(sample(data,20, replace=TRUE), levels=c("a","b"))))))
> sort(res[,1])[c(750,29250)]/20
[1] 0.15 0.55


наверное имеет смысл строить доверительный интервал для разницы показателей?

Код
> res<-t(replicate(30000,as.vector(table(factor(sample(data,20, replace=TRUE), levels=c("a","b","c","e"))))))
> d12<-res[,1]-res[,2]
> sort(d12)[c(750,29250)]
[1] -14   2
> d14<-res[,1]-res[,4]
> sort(d14)[c(750,29250)]
[1]  3 11


Сообщение отредактировал p2004r - 22.01.2012 - 00:57


Signature
Вернуться в начало страницы
 
+Ответить с цитированием данного сообщения
 

Сообщений в этой теме


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