Generalized 𝑞-Bernstein-Schurer Operators and Some Approximation Theorems

Algorithm 2

For the generalized 𝑞-Bernstein-Schurer operators.

𝑛= [20,30,50];𝑝=30;𝑞=0.9;

𝑓𝑜𝑟  𝑗= 1 : 3

  𝑚=𝑛(𝑗);

  𝑎=  [1 : 100];

  𝑖=1;

  𝑓𝑜𝑟  𝑥= 0 : 0.01 : 1

   𝑡=0;

   𝑓𝑜𝑟  𝑘= 0 :  m +𝑝

    𝑧=1;

    𝑓𝑜𝑟  𝑠= 0 :  m +𝑝−𝑘−1

     𝑧=𝑧(1−𝑞^𝑠𝑥);

    𝑒𝑛𝑑

    𝑡=𝑡+𝑞𝑖𝑛𝑡𝑒𝑔𝑒𝑟𝑓𝑎𝑐𝑡𝑚+𝑝,𝑞𝑥𝑞𝑖𝑛𝑡𝑒𝑔𝑒𝑟𝑓𝑎𝑐𝑡𝑘,𝑞𝑞𝑖𝑛𝑡𝑒𝑔𝑒𝑟𝑓𝑎𝑐𝑡𝑚+𝑝−𝑘,𝑞^𝑘𝑧

     ×1+sin−6.5𝑞𝑖𝑛𝑡𝑒𝑔𝑒𝑟𝑘,𝑞𝑞𝑖𝑛𝑡𝑒𝑔𝑒𝑟𝑚,𝑞²;

    𝑒𝑛𝑑

    𝑎(𝑖)=𝑡;

    𝑖=𝑖+1;

   𝑒𝑛𝑑

   𝑥= 0 : 0.01 : 1;

   𝑖𝑓(𝑗==1)

    𝑐=𝑝𝑙𝑜𝑡(𝑥,𝑎)

    𝑠𝑒𝑡(𝑐,“Color”, “blue”, “LineWidth”, 2)

   𝑒𝑙𝑠𝑒  𝑖𝑓(𝑗==2)

    𝑐=𝑝𝑙𝑜𝑡(𝑥,𝑎,“g”)

    𝑠𝑒𝑡(𝑐,“Color” ,“green” ,“LineWidth”, 2)

   𝑒𝑙𝑠𝑒

    𝑐=𝑝𝑙𝑜𝑡(𝑥,𝑎,“r”)

    𝑠𝑒𝑡(𝑐,“Color” ,“red” ,“LineWidth” ,2)

   𝑒𝑛𝑑

   ℎ𝑜𝑙𝑑  𝑜𝑛

𝑒𝑛𝑑

𝑥=  [0 : 0.01 : 1];

𝑦=1+sin(−6.5𝑥²);

𝑎=𝑝𝑙𝑜𝑡(𝑥,𝑦,“−−k” )