############################################################
#Please change the directory you read the data from 	   #
#This can be done by simply removing the comment signs	   #
#or by changing the working directory			   #
############################################################

############################################################
#Here it is an example. I stored all files in the          #
#"UTAH" folder. Telling R to set the entire path to UTAH   # 
#makes data handling easier. Otherwise the function has    # 
#to be changed to ensure proper handling of the data       #
############################################################

#Change the path to ...
setwd("C:\\Program Files\\R\\R-2.6.0\\UTAH")      

#Provide the fraction of Berkson error
fractionBerk=0.5

#Tell R what is the file source in the above path
source("Stratified_NevadaThyroiditis.R")

#Call function
Stratified_NevadaThyroiditis(fractionBerk)

############################################################
#Results are stored in the file 			   #
#							   #
#	"Raystable_test01_fracberk50.txt"		   #
############################################################