## 260 Reputation

6 years, 263 days

## Social Networks and Content at Maplesoft.com

PH.D in Applied Mathematics

## Vector Production...

Maple

Hi all.

Assume that we have:

Where Q is known matrix. how can we produce this vector by maple?

Thanks a lot

Ph.D Candidate

Applied Mathematics Department

## Constructing special matrix...

Maple

Hi all.

Assume that we have:

where

and assume we  want to construct a special Vector as

and from the above vector construct following matrix

how can we do it?

Best wishes

Ph.D Candidate

Applied Mathematics Department

## Spacial Matrix Prodution...

Hi all

I have a mathematical problem and I asked it in various sites but the answers till yet are not correct.

Assume that we have:

T[m]:=t->t^m:
b[n,m]:=unapply(piecewise(t>=(n-1)*tj/N and t<n*tj/N, T[m](N*t-(n-1)*tj), 0), t):

where n,N,tj are known constants. furthermore assume that we want to comute the following integral:

for following approximations:

I have written the following code but it seems to be incorrect:

V1:=Vector([seq(seq(b[n,m](t),m=0..1),n=1..3)]);
V:=evalf(V1.Transpose(V1));

the original program is :

taaylor.mws

I will be so grateful if any one can help me to solve it by maple

Ph.D Candidate

Applied Mathematics Department

## founding the error in program...

hi all.

I have wrore the following program for optimization with bernstein and block pulse hybrid functions.

the program have some errors which i can't understand.

Bernestien1.mws

 > restart:
 > alias(C=binomial): with(LinearAlgebra): macro(LA= LinearAlgebra):
 > HybrFunc:=proc(N, M,  tj)               # N=Number of subintervals,  M=Number of functions in subintervals   local B, n, m; global b; for n from 1 to N do for m from 0 to M-1 do B := (i,m,t) -> C(m,i)*(1-t)^(m-i)*t^i: b[n,m]:=unapply(piecewise(t>=(n-1)*tj/N and tb[n,m](t)): #convert(%,vector); end proc: HybrFunc(3, 3, 1);                                        # End Of Definition   g2(t):=t;            #*exp(t-1):                      # Any other function can be replaced here      g1(t):=add(add(c[n,m]*b[n,m](t), m=0..2), n=1..3); Optimization[Minimize](sqrt(int((g2(t)-g1(t))^2, t=0.. 1))); assign(op(%[2])); plot([g2(t),g1(t)], t=0..1, 0..5, color=[blue,red],thickness=[1,3],discont, scaling=constrained);
 Error, (in Optimization:-NLPSolve) complex value encountered Error, invalid left hand side in assignment (1)

I'll be so grateful if any one can help me.

Ph.D Candidate

Applied Mathematics Department

## Hybrid of bernstein and block pulse...

Hi all

Assume that we have construct new orthogonal Hybrid function of block pulse and bernstein poly nomials as follow:

and assume that we want to approximate a function as follows:

how can we do this with maple????Indeed we want to optimize using this hybrid functions

note that the degree of bernstein polynomials is fix or should be fixed...and

regards

Ph.D Candidate

Applied Mathematics Department

 4 5 6 7 8 Page 6 of 8
﻿