Update read.450k.R

Some Illumina 450K devices generate csv-files with the pattern [DATA] instead of [Data]. In these cases the read.450K.sheet() throws errors and creates a wrong data.frame "targets". This change prevents the error.