Датотека:Lagrange polynomial.svg

Извор: testwiki
Пређи на навигацију Пређи на претрагу
Оригинална датотека (SVG датотека, номинално 743 × 503 пиксела, величина: 85 kB)

Ова датотека се налази на Викимедијина остава и може да се користи на другим пројектима. Њен опис је приказан испод.

Опис

 This W3C-unspecified diagram was created with Mathematica.
Опис
English: This image shows, for four points ((−9, 5), (−4, 2), (−1, −2), (7, 9)), the (cubic) interpolation polynomial L(x) (dashed, black), which is the sum of the scaled basis polynomials y1ℓ1(x), y2ℓ2(x), y3ℓ3(x) and y4ℓ4(x) (colors). The interpolation polynomial passes through all four control points, and each scaled basis polynomial passes through its respective control point and is 0 where x corresponds to the other three control points.
Датум
Извор Self-made, based on Image:Lagrangepolys.png
Аутор User:Glosser.ca
Остале верзије Based on Image:Lagrangepolys.png.

Mathematica Code

colors = ColorData[97] /@ Range[4];
pts = {{\[Minus]9, 5}, {\[Minus]4, 2}, {\[Minus]1, \[Minus]2}, {7, 9}};
{xs, ys} = Transpose[pts];

Basis[pts_, x_] := Times @@ (x - DeleteCases[pts, #])/Times @@ (# - DeleteCases[pts, #]) & /@ pts

Plot[
 {
  Evaluate[ys*Basis[xs, x]],
  Total[ys*Basis[xs, x]]
 }, {x, -9, 7},
 PlotStyle -> {Automatic, Automatic, Automatic, Automatic, Directive[Black, Dashed]},
 Frame -> True,
 Axes -> False,
 ImageSize -> Large,
 GridLines -> Automatic,
 GridLinesStyle -> Directive[LightGray, Dashed],
 PlotStyle -> Thick,
 Epilog -> Table[{PointSize[0.02], ColorData[97][i], Point[pts[[i]]]}, {i,4}],
 PlotLegends -> Placed[
  LineLegend[{
   Subscript[\[ScriptL], 1][x], 
   Subscript[\[ScriptL], 2][x],
   Subscript[\[ScriptL], 3][x], 
   Subscript[\[ScriptL], 4][x],
   L[x]
  }, LegendLayout -> {"Row", 1}],
  Top
 ],
 FrameStyle -> Black
]

Лиценцирање

Ја, носилац ауторских права над овим делом, објављујем исто под следећим лиценцама:
GNU head Дата је дозвола да се копира, дистрибуира и/или мења овај документ под условима ГНУ-ове лиценце за слободну документацију, верзије 1.2 или било које новије верзије коју објави Задужбина за слободни софтвер; без непроменљивих одељака и без текста на насловној и задњој страни. Текст лиценце можете прочитати овде.
w:sr:Creative Commons
ауторство делити под истим условима
Ова датотека је доступна под лиценцом Creative Commons Ауторство-Делити под истим условима 3.0 Unported.
Дозвољено је:
  • да делите – да умножавате, расподељујете и преносите дело
  • да прерађујете – да прерадите дело
Под следећим условима:
  • ауторство – Морате да дате одговарајуће заслуге, обезбедите везу ка лиценци и назначите да ли су измене направљене. Можете то урадити на било који разуман манир, али не на начин који предлаже да лиценцатор одобрава вас или ваше коришћење.
  • делити под истим условима – Ако измените, преобразите или доградите овај материјал, морате поделити своје доприносе под истом или компатибилном лиценцом као оригинал.
Ова лиценца је додата на ову датотеку као део ажурирања GFDL лиценце.
Изаберите лиценцу по жељи.

Поднаписи

Укратко шта ова датотека представља/приказује

Ставке приказане у овој датотеци

приказује

26. децембар 2015

Историја датотеке

Кликните на датум/време да бисте видели тадашњу верзију датотеке.

Датум/времеМинијатураДимензијеКорисникКоментар
тренутна19:29, 23. април 2016.Минијатура за верзију на дан 19:29, 23. април 2016.743 × 503 (85 kB)wikimediacommons>RayhemSwapped axis for frame; added legend.

Следећа страница користи ову датотеку: