[Date Index] [Thread Index] [Author Index]

Re: Question about filenames for Export[...]

• To: mathgroup at smc.vnet.net
• Subject: [mg99761] Re: Question about filenames for Export[...]
• From: Szabolcs Horvát <szhorvat at gmail.com>
• Date: Wed, 13 May 2009 05:09:23 -0400 (EDT)
• References: <gubgej$9v0$1@smc.vnet.net>

Lorents wrote:
> Hello,
> I'm using Mathematica 6.
> I'd like to know how to define a file name (to be later used in Export) so 
> that the file name contains the value of an index variable i.
> To exemplify, in Fortran this task would be accomplished by something like:
> 
> character(len) :: FileName
> ...
> write(FileName,'(A,I4.4)') 'MyName', i
> 
> These lines would produce filenames which, for i=1,2,... are MyName0001, 
> MyName0002, ...
> 

I'd also like to know if there is a "neat" way to achieve this.  The way 
I've been using was not that pretty ...

makeFileName[i_Integer] :=
  "prefix" <> ToString@PaddedForm[i, 4, NumberPadding -> "0"]

What I hate about this is that it adds an extra zero ...  See what 
makeFileName[12345] outputs.

Another way is

makeFileName2[i_] := "prefix" <> ToString /@ IntegerDigits[i, 10, 5]

But do we really need to do so much work---breaking the number into 
digits---for something so simple?