rheology_sampleData: Sample rheological stress sweep

In tbgitoo/rheologyEvaluation: rheologyEvaluation

Description

Sample rheological stress sweep, obtained on a commercial sample of Restylane Lidocaine, on a Rheostress 100 instrument, plate-plate geometry, 0.2Hz oscillatory sweep. We used a pre-conditioning step (increase of shear stress at low level followed by decrease), which is removed from the actual sweep

Usage

data(rheology_sampleData)

Format

Constains a single variable rheology_sampleData:

rheology_sampleData

data.frame with 8 columns: tau_Pa indicates the shear stress, Gprimeprime_Pa the viscous modulus G”, Gprime_Pa the elastic modulus G', Phase_angle_degrees the phase angle determined by G' and G”, Gamma_in_percent the shear deformation in percent, f_Hz the excitation frequency in Hz, t_s the time from the beginning of the experiment, and t_seg_s the time in the current acquisition segment.

Examples

# Generation of the data
path=system.file("sampleData",package="rheologyEvaluation")
file="Restylane_syringe_1.txt"
colname_info=
	list("tau_Pa"=c("Tau.en.Pa","X..en.Pa"),
	"Gprimeprime_Pa"=c("G..en.Pa"),
	"Gprime_Pa"=c("X.G...en.Pa.","G..en.Pa.1"),
	"Phase_angle_degrees"=c("X..en...1","Da.en.."),
	"Gamma_in_percent"=c("X..en..","Ga.en.."),
	"f_Hz"=c("f.en.Hz"),
	"t_s"=c("t.en.s"),
	"t_seg_s"="t_seg.en.s")
rheology_sampleData=read_Haake_Rheowin_text_file(file=paste(path,file,sep="/"),colname_info=colname_info,header=TRUE,skip=6,sep=c(";"),comment.char="",blank.lines.skip=FALSE,quote="")

# There is a preconditioning step consisting in ramping up and down and up the applied shear stress in this sample, remove to obtain a single sweep curve. This is the first 18 points
rheology_sampleData=rheology_sampleData[19:length(rheology_sampleData$tau_Pa),]


# Loading and plotting of the data
data(rheology_sampleData)
plot(Gprime_Pa ~ tau_Pa, rheology_sampleData,log="xy",type="b",main="rheology_sampleData")
lines(Gprimeprime_Pa ~ tau_Pa, rheology_sampleData,type="l")
legend("bottomleft",legend=c("Elastic modulus G'","Viscous modulus G''"),lty=c(-1,1),pch=c(21,-1))

tbgitoo/rheologyEvaluation documentation built on March 19, 2021, 8 p.m.