Re: partitioning a string
- To: mathgroup at smc.vnet.net
- Subject: [mg60964] Re: [mg60932] partitioning a string
- From: János <janos.lobb at yale.edu>
- Date: Wed, 5 Oct 2005 02:28:09 -0400 (EDT)
- References: <200510040524.BAA17916@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
On Oct 4, 2005, at 1:24 AM, Sara wrote:
> I have tred to partition a String and iwrote this code but its take
> to time to run, and it doesnt show eny result.
> stringPartition[s_, n_] := Module[{}, emptyString = Mod[StringLength
> [s], n];
> If[emptyString != 0, empt = n - emptyString];
> str1 := " ";
> str2 := "";
> For[i = 1, i <= empt, i++, str2 = str2 <> str1];
> str = s <> str2;
> M = StringLength[str];
> yasList = Range[1, M/n] ;
> For[i = 1, i <= M, i + n, For[j = 1, j <= M/n, j++,
> yasList[[j]] = StringTake[i, j*n]
> ];
> ];
How about if you convert your string first into Characters and then
use normal Partition to partition it. Then at the end you can
convert the characters back to string with StringJoin[Map
[ToString,yourlist]]
János
----------------------------------------------
Trying to argue with a politician is like lifting up the head of a
corpse.
(S. Lem: His Master Voice)
- References:
- partitioning a string
- From: Sara <ma_sara177@hotmail.com>
- partitioning a string