1. Lun 27/09 | 2. Mar 28/09 | 3. Gio 30/09 | 4. Ven 1/10 |
5. Lun 4/10 | 6. Mar 5/10 | 7. Gio 7/10 | 8. Ven 8/10 |
9. Lun 11/10 | 10. Mar 12/10 | 11. Gio 14/10 | 12. Ven 15/10 |
13. Lun 18/10 | 14. Mar 19/10 | 15. Gio 21/10 | 16. Ven 22/10 |
-------------------- | 17. Mar 26/10 | 18. Gio 28/10 | 19. Ven 29/10 |
-------------------- | 20. Mar 2/11 | 21. Gio 4/11 | 22. Ven 5/11 |
23. Lun 8/11 | -------------------- | 24. Gio 11/11 | 25. Ven 12/11 |
26. Lun 15/11 | 27. Mar 16/11 | 28. Gio 18/11 | 29. Ven 19/11 |
30. Lun 22/11 | 31. Mar 23/11 | 32. Gio 25/11 | 33. Ven 26/11 |
34. Lun 29/11 | 35. Mar 30/11 | 36. Gio 2/12 | 37. Ven 3/12 |
38. Lun 6/12 | 39. Mar 7/12 | 40. Gio 9/12 | 41. Ven 10/12 |
42. Lun 13/12 | 43. Mar 14/12 | 44. Gio 16/12 | 45. Ven 17/12 |
-------------------- | 46. Mar 21/12 | -------------------- | -------------------- |
-------------------- | -------------------- | -------------------- | 47. Ven 7/01 |
48. Lun 10/01 | 49. Mar 11/01 | 50. Gio 13/01 | 51. Ven 14/01 |
resistenze | condensatori | |
regola | ΔV = I × R | ΔV = Q × 1/C |
serie | stessa I (si sommano le ΔVi) → si sommano Ri |
stessa Q (si sommano le ΔVi) → si sommano 1/Ci |
parallelo | stessa ΔV (si sommano le Ii) → si sommano 1/Ri |
stessa ΔV (si sommano le Qi) → si sommano Ci |
A = matrix(1:9, 3,3) A A = matrix(round(rnorm(100),3), 10,10) A iA <- solve(A) iA P <- iA %*% A P diag(P) A = matrix(round(rnorm(1000000),3), 1000,1000) iA <- solve(A) P <- iA %*% A diag(P)[La funzione rnorm(n) genera n numeri (pseudo-)casuali secondo una gaussiana avente media 0 e deviazione standard 1.
omega = 1 # (s^-1) tanto per metterci qualcosa T = 2*pi/omega curve( cos(omega*t), -T/2, 1.5*T, xname='t', lwd=2, ylab='sinusoidi') grid() curve( cos(omega*t + pi/2), xname='t', lwd=2, col='red', add=TRUE) curve( cos(omega*t - pi/2), xname='t', lwd=2, col='green', add=TRUE)
omega = 1 # (s^-1) tanto per metterci qualcosa T = 2*pi/omega curve( cos(omega*t), -T/2, 1.5*T, xname='t', lwd=2, ylab='sinusoidi') grid() curve( cos(omega*t + pi/10), xname='t', lwd=2, col='red', add=TRUE) curve( cos(omega*t - pi/10), xname='t', lwd=2, col='green', add=TRUE)
a = 1i sqrt(a) -sqrt(a) abs(sqrt(a)) Arg(sqrt(a)) Arg(sqrt(a)) * 180/pi abs(-sqrt(a)) Arg(-sqrt(a)) Arg(-sqrt(a)) * 180/pi(Provare a riottenere i risultati facendo i conti a mano; ripetere i comandi con a = -1i)
f=5; p=5000; h=1000; (q=p*f/(p-f)); (M=-q/p); (hi=M*h)Continuazione: ⇒ Problemi nr. 1 e 2 di questa lezione.
f=1; p=2*f; h=1; (q=p*f/(p-f)); (M=-q/p); (hi=M*h)Per foto 'tipiche' dei due possibili casi,