⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀         ⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀⠀
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

36 lines
3.0 KiB

  1. clc;tic;clf;clear;set(0,'DefaultFIGUREWINDOWSTYLE','DOCKED');
  2. syms X
  3. O_YTITNAUQ_TNIOP_TOLP_O_PLOT_POINT_QUANTITY_O=1+ (((( 2^8 )))) ;
  4. O_EGNAR_X_O_X_RANGE_O= (((( -2 )))) : 1/(O_YTITNAUQ_TNIOP_TOLP_O_PLOT_POINT_QUANTITY_O-1) : (((( 2 )))) ;
  5. O_ALUMROF_O_FORMULA_O=@(X) (((( X.^3.35 )))) ;
  6. %O_ALUMROF_O_FORMULA_O=@(X) (((( 1./(exp(1./X + 1./(X - 1)) + 1) )))) ; %
  7. %O_ALUMROF_O_FORMULA_O=@(X) (((( .5.*(1+tanh((.5-X)./((-1+X).*X))) )))) ; %
  8. %O_ALUMROF_O_FORMULA_O=@(X) (((( ((-32.*(max(0,-15./16+X).^3-max(0,-13./16+X).^3-max(0,-11./16+X).^3+max(0,-9./16+X).^3-max(0,-7./16+X).^3+max(0,-5./16+X).^3+max(0,-3./16+X).^3-max(0,-1./16+X).^3))./3) )))) ; %
  9. fprintf('%s\n',O_ALUMROF_O_FORMULA_O(X));
  10. fprintf('%s\n',simplify(expand(O_ALUMROF_O_FORMULA_O(X),"IGNOREANALYTICCONSTRAINTS",true),"STEPS",16,"CRITERION","PREFERREAL","IGNOREANALYTICCONSTRAINTS",true));
  11. O_TFIHS_THGIEH_O_HEIGHT_SHIFT_O_HEIGHT_SHIFT_O= (((( .5 )))) ;
  12. O_SIXA_X_GNOLA_GNILCYC_LACITREW_O_WERTICAL_CYCLING_ALONG_X_AXIS_O=@(X)(-1).^floor(X).*(O_ALUMROF_O_FORMULA_O(mod(X,1))-O_TFIHS_THGIEH_O_HEIGHT_SHIFT_O_HEIGHT_SHIFT_O)+O_TFIHS_THGIEH_O_HEIGHT_SHIFT_O_HEIGHT_SHIFT_O;
  13. fprintf('\n%s\n',O_SIXA_X_GNOLA_GNILCYC_LACITREW_O_WERTICAL_CYCLING_ALONG_X_AXIS_O(X));
  14. fprintf('%s\n',simplify(expand(O_SIXA_X_GNOLA_GNILCYC_LACITREW_O_WERTICAL_CYCLING_ALONG_X_AXIS_O(X),"IGNOREANALYTICCONSTRAINTS",true),"STEPS",16,"CRITERION","PREFERREAL","IGNOREANALYTICCONSTRAINTS",true));
  15. O_SIXA_X_GNOLA_GNILCYC_LATNOZIROH_O_HORIZONTAL_CYCLING_ALONG_X_AXIS_O=@(X)O_ALUMROF_O_FORMULA_O(mod(X,1)).*(mod(floor(X+1),2))+O_ALUMROF_O_FORMULA_O(1-mod(X,1)).*(mod(floor(-X+1),2));
  16. fprintf('\n%s\n',O_SIXA_X_GNOLA_GNILCYC_LATNOZIROH_O_HORIZONTAL_CYCLING_ALONG_X_AXIS_O(X));
  17. fprintf('%s\n',simplify(expand(O_SIXA_X_GNOLA_GNILCYC_LATNOZIROH_O_HORIZONTAL_CYCLING_ALONG_X_AXIS_O(X),"IGNOREANALYTICCONSTRAINTS",true),"STEPS",16,"CRITERION","PREFERREAL","IGNOREANALYTICCONSTRAINTS",true));
  18. figure(gcf);
  19. subplot(3,1,1);
  20. plot(O_EGNAR_X_O_X_RANGE_O, O_ALUMROF_O_FORMULA_O(O_EGNAR_X_O_X_RANGE_O));
  21. xlim([-2 2]);ylim([-1 1]);
  22. pbaspect([4 1 1])
  23. subplot(3,1,2);
  24. plot(O_EGNAR_X_O_X_RANGE_O, O_SIXA_X_GNOLA_GNILCYC_LACITREW_O_WERTICAL_CYCLING_ALONG_X_AXIS_O(O_EGNAR_X_O_X_RANGE_O));
  25. xlim([-2 2]);ylim([-1 1]);
  26. pbaspect([4 1 1])
  27. subplot(3,1,3);
  28. plot(O_EGNAR_X_O_X_RANGE_O, O_SIXA_X_GNOLA_GNILCYC_LATNOZIROH_O_HORIZONTAL_CYCLING_ALONG_X_AXIS_O(O_EGNAR_X_O_X_RANGE_O));
  29. xlim([-2 2]);ylim([-1 1]);
  30. pbaspect([4 1 1])
  31. fprintf(1,['\n\n%.' num2str(2^6) 'f\n'],toc);