[求助]哪位大虾帮我把图打出来

肖艟

我这有一个程序，不过使用时就无法打出，但是cpu暴转！
程序如下，希望哪位大虾帮我把图打出来！
谢谢！xingyutao@163.com 这是我的邮箱！

1. close all;
   
2. x = zeros(1,100);
   
3. y = zeros(1,100);
   
4. j=-10;
   
5. for l=1:100
   
6. x(l) = j;
   
7. j=j+0.2;
   
8. end
   
9. j = -10;
   
10. for l=1:100
    
11. y(l) =j;
    
12. j=j+0.2;
    
13. end
    
14. for l= 1:100
    
15. for j= 1:100
    
16. m=x(l);
    
17. n=y(j);
    
18. for k= 1:1000
    
19. z=m+n*i;
    
20. z=z*(0.25+1.5/(1+(z^4)));
    
21. m=real(z);
    
22. n=imag(z);
    
23. end
    
24. if abs(m-1)<0.01
    
25. plot(x(l),y(j),'r');
    
26. hold on;
    
27. end
    
28. if abs(m+1)<0.01
    
29. plot(x(l),y(j),'y');
    
30. hold on;
    
31. end
    
32. if abs(n-1)<0.01
    
33. plot(x(l),y(j),'b');
    
34. hold on;
    
35. end
    
36. if abs(n+1)<0.01
    
37. plot(x(l),y(j),'k');
    
38. hold on;
    
39. end
    
40. end
    
41. end

复制代码

肖艟

还有着个

1. close all;
   
2. x = zeros(1,2000);
   
3. y = zeros(1,2000);
   
4. j=-10;
   
5. for l=1:2000
   
6. x(l) = j;
   
7. j=j+0.01;
   
8. end
   
9. j = -10;
   
10. for l=1:2000
    
11. y(l) =j;
    
12. j=j+0.01;
    
13. end
    
14. for l= 1:2000
    
15. for j= 1:2000
    
16. m=x(l);
    
17. n=y(j);
    
18. for k= 1:1000
    
19. z=m+n*i;
    
20. z=z*(0.25+1.5/(1+(z^4)));
    
21. m=real(z);
    
22. n=imag(z);
    
23. end
    
24. if abs(m-1)<0.01
    
25. plot(x(l),y(j),'r');
    
26. hold on;
    
27. end
    
28. if abs(m+1)<0.01
    
29. plot(x(l),y(j),'y');
    
30. hold on;
    
31. end
    
32. if abs(n-1)<0.01
    
33. plot(x(l),y(j),'b');
    
34. hold on;
    
35. end
    
36. if abs(n+1)<0.01
    
37. plot(x(l),y(j),'k');
    
38. hold on;
    
39. end
    
40. end
    
41. end

复制代码

cdwxg

你这个是不是程序有问题哦？
不可能打出来吧...

happy

你这两个程序应该不是代码本身的问题，而是计算量太大
循环次数就达到了1000万次，是计算的慢你没耐心等待而已
如果你把第一个程序中的100都改成10运行看看