R version 3.0.1 (2013-05-16) -- "Good Sport"
Copyright (C) 2013 The R Foundation for Statistical Computing
Platform: i686-pc-linux-gnu (32-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.

> x <- c(112,118,132,129,121,135,148,148,136,119,104,118,115,126,141,135,125,149,170,170,158,133,114,140,145,150,178,163,172,178,199,199,184,162,146,166,171,180,193,181,183,218,230,242,209,191,172,194,196,196,236,235,229,243,264,272,237,211,180,201,204,188,235,227,234,264,302,293,259,229,203,229,242,233,267,269,270,315,364,347,312,274,237,278,284,277,317,313,318,374,413,405,355,306,271,306,315,301,356,348,355,422,465,467,404,347,305,336,340,318,362,348,363,435,491,505,404,359,310,337,360,342,406,396,420,472,548,559,463,407,362,405,417,391,419,461,472,535,622,606,508,461,390,432)
> par4 = '12'
> par3 = 'Tijdreeks die de omzet uitdrukt van labo A.T.C. in euro van 01/2004 tot en met 31/2013 '
> par2 = '"niet gekend"'
> par1 = 'Omzet Labo A.T.C. (Euro)'
> ylimmax = ''
> ylimmin = ''
> ylab = 'Omzet (EURO)'
> xlab = 'Maand (01/2004 - 31/2013)'
> main = 'Omzet labo A.T.C (basisjaar 2004)'
> par4 <- '12'
> par3 <- 'Tijdreeks die de omzet uitdrukt van labo A.T.C. in euro van 01/2004 tot en met 31/2013 '
> par2 <- ''niet gekend''
Error: unexpected symbol in "par2 <- ''niet"
Execution halted