graphics | دانلود طرح نقاشی

نوشته شده در موضوع دانلود طرح نقاشی در 13 ژوئن 2018

graphics

Here’s a account of a avocation that generalizes a epoch of time face to concur we to simply change a impression of a numbers, a array of “hours”, and a radius of a face:

Options[clockFace] = {FontFamily - "Georgia", FontSize - 30};
clockFace[hours_Integer, radius_?NumericQ, opts : OptionsPattern[]] /;
   hours  0  Im[radius] == 0  radius  0 :=
 With[{range = Range[12]},
  With[{objects = 
        Style[#, 
          FilterRules[{opts}, Options[Style]] ~Join~ Options[clockFace]]  /@ range,
       thetas = Pi/2 - 2 Pi*range/hours},
  Graphics[Append[
     MapThread[Text[#1, {Cos[#2], Sin[#2]}] , {objects, thetas}],
     Circle[radius*1.2]]]]]

Some things are usually Mathematica impression issues; for instance,

FilterRules[{opts}, Options[Style]] ~Join~ Options[clockFace]

is usually a proceed to pass a convenient discretionary arguments to Style while origination certain that clockFace‘s default values are used where relevant, given Mathematica will use a initial convenient method that it finds in a list of manners (and avocation options are usually lists of rules). we also used With to name things, that is given there’s that nesting; other people cunning bring to use a unaccompanied Module. Either way, it’s always best to make things inner variables whenever possible.

The biggest change, though, was generating a list of numbers in order, controlling Range, and thereafter adjusting a construction of thetas so all winds adult in a right place. we cruise it’s many easier to see what’s going on, given a rebate pointer means you’re relocating around clockwise and offsetting by Pi/2 creates it pure you’re starting during a tip of a clock.

Article source: https://stackoverflow.com/questions/8187378/drawing-clock-face-in-mathematica-looking-for-a-better-solution


tiger pelak 2 graphics

Article source: http://buy4painting.blog0.ir/2018/06/05/graphics/

دیدگاهتان را بنویسید