Advanced Search

Question: The book didnt even gave the right answer

Question:The book didnt even gave the right answer

The function 110 Maple 2019
leastsquares
May 10 2023
0

The answers from the book dont make any sense after using their solution. Its not producing the expected results. 

This is the translation by the way: "A battery that has a voltage U, is in series with a resistor R, and a condenser with capacity C. The current strength on a given time "t" in this circuit is given by i=i(t)=U/R*e^-(t/R*C). Determine R and C based on the data given in table 5.6, the current is U=100V."

Greetings,

The Function


 

> 

restart
> 

U := 100

100

 (1)
> 

R := 4900

4900

 (2)
> 

C := 20*(1/1000)

1/50

 (3)
> 

"v(t):=U/(R)*(e)^(-(t/(R*C)))"

proc (t) options operator, arrow, function_assign; U*exp(-t/(R*C))/R end proc

 (4)
> 

v(.1)

0.2038734923e-1

 (5)

NULL

> 

data := LinearAlgebra:-Transpose(`<,>`(`<|>`(.1, .2, .3, .4, .5), `<|>`(7.36, 2.7, .99, .37, .13)))

Matrix(%id = 18446746712187741238)

 (6)
> 

plot(data, style = point)

 
> 

X := data[() .. (), 1]; Y := data[() .. (), 2]

Vector(5, {(1) = .1, (2) = .2, (3) = .3, (4) = .4, (5) = .5})

  

Vector[column](%id = 18446746712187761598)

 (7)
> 

sumX := add(X); sumY := add(Y); sumX2 := add(x^2, `in`(x, X)); sumXY := X.Y

1.5

  

11.55

  

.55

  

1.78600000000000003

 (8)
> 

eq1 := numelems(X)*a+b*sumX = sumY; eq2 := a*sumX+b*sumX2 = sumXY

5*a+1.5*b = 11.55

  

1.5*a+.55*b = 1.78600000000000003

 (9)
> 

solve({eq1, eq2}, {a, b})

{a = 7.347000000, b = -16.79000000}

 (10)

``

Download Mapleprimes_Question_Book_2_Paragraph_5.12_Question_5.mw
Please Wait...