SHARE
TWEET

Untitled

a guest Jun 17th, 2019 59 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. ClearAll[sR]
  2. sR = StringReplace[Repeated["X", {8}] :> "XXXXX"];
  3.  
  4. str = StringJoin@ConstantArray["X", 14]
  5.      
  6. FixedPointList[sR, str]
  7.      
  8. FixedPoint[sR, str]
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top