Skip to main content
13 events
when toggle format what by license comment
Aug 6, 2021 at 19:48 answer added jpbbrito timeline score: 0
Jul 26, 2016 at 18:58 answer added eparra timeline score: 1
Feb 3, 2015 at 13:40 vote accept sara kaviani
Feb 3, 2015 at 13:35 comment added sara kaviani Thank you dear Jason.I'm trying to learn Mathematica and am really an amateur!
Feb 3, 2015 at 9:50 answer added SquareOne timeline score: 3
Feb 3, 2015 at 9:46 answer added dionys timeline score: 0
Feb 3, 2015 at 9:36 comment added Jason B. @sarakaviani I edited your question to include your code (which I can't get to run as written - the test for the While loop isn't constructed right I think).
Feb 3, 2015 at 9:28 history edited Jason B. CC BY-SA 3.0
added 721 characters in body
Feb 3, 2015 at 8:53 comment added sara kaviani I want to change "s" in the name of the files each time with the real value of it in that itteration
Feb 3, 2015 at 8:52 comment added sara kaviani s = -1 While[s < 2*q = 2.; [CapitalDelta] = 0.5; smin = -0.3; smax = 0.1; [CapitalDelta]s = 0.01; L = 5; p = 2^L; s = s + 0.05; H = {{1, 0, 0, 0}, {0, 1 - ([CapitalDelta] + 1)*q, E^s/q, E^s/q}, {0, qE^s, 1 - ([CapitalDelta] + 1)/q, qE^s}, {0, [CapitalDelta]*q*E^s, ([CapitalDelta]*E^s)/q, 1 - (q + 1/q)}}; IM = IdentityMatrix[2]; row = ConstantArray[1, p]; sum = row . H; Export["sum,L=5,q=2,d=0.5,s=-1.txt", sum]; Export["H,L=5,q=2,d=0.5,s=-1.txt", Flatten[H], "Table"]]
Feb 3, 2015 at 8:48 comment added chris Do[Export["superfile-"<>ToString[i]<>".jpg",fig[[i]]],{i,1,10}]
Feb 3, 2015 at 8:40 comment added SquareOne You should be more specific (please give some code) but maybe this will help.
Feb 3, 2015 at 8:37 history asked sara kaviani CC BY-SA 3.0