output a sequence of plots

Paul E. Green a ??crit :

... Any solutions that would
save me from repeating this code 120 times? Can I
pass arguments inside quotes? Can I write a function
to do this?

as a toy example, with some of the usable functions :
(see ?dir)

fct00 = function()
{
rep0 = "data";	
fichier = dir(rep0, pattern="*.emf");
nbfichiers = length(fichier);

for (i in 1:nbfichiers)
	{
#	do the job
	}
}