readpd_rtv {cry}

Reads and output a CIF file for powder diffraction

Description

Reads and output a CIF file for powder diffraction

Usage

readpd_rtv(filename, message = FALSE)

Arguments

filename

A character string. The path to a valid CIF file.

message

A logical variable. If TRUE (default) the function prints a message highlighting what is included in the cif file.

Value

A named list. Each name correspond to a valid field in the powder diffraction Rietveld processed CIF.

Examples

datadir <- system.file("extdata",package="cry")
filename <- file.path(datadir,"e-65-00i60-Isup2.rtv")
lCIF <- readpd_rtv(filename)
print(names(lCIF))
print(lCIF$INTRO$CELL)
print(lCIF$INTRO$HALL)
print(lCIF$INTRO$HM)
print(lCIF$REFL)