Cardiovascular Responses to Head-up Tilt

Description

This data set contains the cardiovascular responses to a passive head-up tilt for 223 subjects.

Usage

data(LASERI)

Format

A data frame with 223 observations on the following 32 variables.

Sex

a factor with levels Female and Male.

Age

Age in years.

Height

Height in cm.

Weight

Weight in kg.

Waist

Waist circumference in cm.

Hip

Hip circumference in cm.

BMI

Body mass index.

WHR

Waist hip ratio.

HRT1

Average heart rate in the tenth minute of rest.

HRT2

Average heart rate in the second minute during the tilt.

HRT3

Average heart rate in the fifth minute during the tilt.

HRT4

Average heart rate in the fifth minute after the tilt.

COT1

Average cardiac output in the tenth minute of rest.

COT2

Average cardiac output in the second minute during the tilt.

COT3

Average cardiac output in the fifth minute during the tilt.

COT4

Average cardiac output in the fifth minute after the tilt.

SVRIT1

Average systemic vascular resistance index in the tenth minute of rest.

SVRIT2

Average systemic vascular resistance index in the second minute during the tilt.

SVRIT3

Average systemic vascular resistance index in the fifth minute during the tilt.

SVRIT4

Average systemic vascular resistance index in the fifth minute after the tilt.

PWVT1

Average pulse wave velocity in the tenth minute of rest.

PWVT2

Average pulse wave velocity in the second minute during the tilt.

PWVT3

Average pulse wave velocity in the fifth minute during the tilt.

PWVT4

Average pulse wave velocity in the fifth minute after the tilt.

HRT1T2

Difference HRT1 - HRT2.

COT1T2

Difference COT1 - COT2.

SVRIT1T2

Difference SVRIT1 - SVRIT2.

PWVT1T2

Difference PWVT1 - PWVT2.

HRT1T4

Difference HRT1 - HRT4.

COT1T4

Difference COT1 - COT4.

SVRIT1T4

Difference SVRIT1 - SVRIT4.

PWVT1T4

Difference PWVT1 - PWVT4.

Details

This data is a subset of hemodynamic data collected as a part of the LASERI study (English title: “Cardivascular risk in young Finns study”) using whole-body impedance cardiography and plethysmographic blood pressure recordings from fingers. The data given here comes from 223 healthy subjects between 26 and 42 years of age, who participated in the recording of the hemodynamic variables both in a supine position and during a passive head-up tilt on a motorized table. During that experiment the subject spent the first ten minutes in a supine position, then the motorized table was tilted to a head-up position (60 degrees) for five minutes, and for the last five minutes the table was again returned to the supine position.

Of interest in this data is for example if the values 5 minutes after the tilt are already returned to their pre-tilt levels.

Source

Data courtesy of the LASERI study
(http://youngfinnsstudy.utu.fi/).

Examples

# for example testing if the location before the tilt is the same as 
# 5 minutes after the tilt:
data(LASERI)
DIFFS.T1T4 <- subset(LASERI,select=c(HRT1T4,COT1T4,SVRIT1T4))
rank.ctest(DIFFS.T1T4)
rank.ctest(DIFFS.T1T4, score="s")

Results

R version 3.3.1 (2016-06-21) -- "Bug in Your Hair"
Copyright (C) 2016 The R Foundation for Statistical Computing
Platform: x86_64-pc-linux-gnu (64-bit)

R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.

R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.

Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.

> library(ICSNP)
Loading required package: mvtnorm
Loading required package: ICS
> png(filename="/home/ddbj/snapshot/RGM3/R_CC/result/ICSNP/LASERI.Rd_%03d_medium.png", width=480, height=480)
> ### Name: LASERI
> ### Title: Cardiovascular Responses to Head-up Tilt
> ### Aliases: LASERI
> ### Keywords: datasets
> 
> ### ** Examples
> 
> # for example testing if the location before the tilt is the same as 
> # 5 minutes after the tilt:
> data(LASERI)
> DIFFS.T1T4 <- subset(LASERI,select=c(HRT1T4,COT1T4,SVRIT1T4))
> rank.ctest(DIFFS.T1T4)

	Marginal One Sample Signed Rank Test

data:  DIFFS.T1T4
T = 151.82, df = 3, p-value < 2.2e-16
alternative hypothesis: true location is not equal to c(0,0,0)

> rank.ctest(DIFFS.T1T4, score="s")

	Marginal One Sample Sign Test

data:  DIFFS.T1T4
T = 161.31, df = 3, p-value < 2.2e-16
alternative hypothesis: true location is not equal to c(0,0,0)

> 
> 
> 
> 
> 
> dev.off()
null device 
          1 
>