चुनौती

एक पूर्णांक के एक इनपुट, यह देखते हुए $n$ (जहाँ $0<n<50$ ), उत्पादन का ग्राफ $y=\mathrm{Re}((-n)^x)$ से के लिए समावेशी। $x = -3$ $x = 3$

जहाँ जटिल संख्या का वास्तविक भाग है । $\mathrm{Re}(p)$ $p$

ध्यान दें कि $\mathrm{Re}((-n)^x) = n^x \cos{(\pi x)}$

उत्पादन

आउटपुट किसी भी रूप में हो सकता है जिसे आप चाहें (जैसे एक छवि या एक खिड़की आदि)। ASCII कला को अस्वीकृत कर दिया गया है।

ग्राफ में कुल्हाड़ियों की आवश्यकता नहीं है (बिना अंतर्निहित रेखांकन कार्यों के लिए भाषाओं को अनुमति देने के लिए प्रतिस्पर्धा करने के लिए)।

यदि कोई चित्र आउटपुट है, तो यह प्रत्येक पक्ष 500 पिक्सेल से अधिक लंबा होना चाहिए। इसी तरह, भूखंड को छवि को सबसे अच्छा रूप में भरना चाहिए।

भूखंडों के बीच न्यूनतम अंतराल 0.05 है।

वेक्टर ग्राफिक्स की अनुमति है।

उदाहरण

के इनपुट के लिए 2:

के इनपुट के लिए 1:

आपको अपने उत्तर (n = 1 और n = 2) में अपने संबंधित आउटपुट डालने होंगे।

जीतना

बाइट्स में सबसे छोटा कोड जीतता है।

— बीटा डिके
स्रोत

37

ASCII art is disallowed.(')

— अल्बर्ट

1

क्या अक्ष ग्राफ के बाएं और निचले किनारों पर हो सकता है? केंद्र में के बजाय?

— कृतिका लिथोस

2

"यदि कोई चित्र आउटपुट है, तो यह प्रत्येक पक्ष 500 पिक्सेल से अधिक लंबा होना चाहिए।" क्या वेक्टर ग्राफिक्स की अनुमति है?

— मार्टिन एंडर

1

@MartinEnder हां, मुझे ऐसा लगता है

— बीटा डिके

4

मैं पहले उत्तरों में से कुछ के रूप में MATLAB, MATL और Mathematica को देखकर आश्चर्यचकित क्यों नहीं हूं। :)

— केविन क्रूज़सेन

12

MATL, 22 18 16 बाइट्स

अतिरिक्त -2 बाइट्स के लिए @LuisMendo धन्यवाद!

I_.01I3$:i_y^&XG


I_                       push 3 and negate         
  .01                    push 0.01
     I                   push 3  
      3$:                generate the list [-3,-2.99,-2.98,...,3]                        
         i_y^            calculate (-input)^(list)                 
             $XG         plot the first list against th real part of the second list

इसे matl.suever.net पर आज़माएं

— flawr
स्रोत

21

टीआई-बेसिक, 26 21 बाइट्स

~3→Xmin
3→Xmax
Prompt N
DrawF N^Xcos(πX

एन = 2 के लिए आउटपुट:

— Timtech
स्रोत

1

मैं आपके कोड में ४ your अक्षर

— कोनराड रुडोल्फ

11

@KonradRudolph देखें: TI-Basic स्कोरिंग दिशा-निर्देश।

— Addison Crump

5

"यदि कोई चित्र आउटपुट है, तो यह प्रत्येक पक्ष 500 पिक्सेल से अधिक लंबा होना चाहिए।" ऐसा प्रतीत नहीं होता कि बिल्ट इन ग्राफिंग क्षमता यहां काम करेगी।

— user5090812

7

@ user5090812 "आउटपुट आपकी इच्छानुसार हो सकता है (उदाहरण के लिए कोई छवि या विंडो आदि)" - मैं ग्राफ़ विंडो द्वारा आउटपुट कर रहा हूं, न कि कोई छवि, इसलिए यह प्रतिबंध लागू नहीं होता है।

— टिमटेक

1

किसने सोचा होगा कि एक रेखांकन कैलकुलेटर चीज़ों को रेखांकन कर सकता है!

— 19

15

बैश + ग्नुप्लोट, 56 45 बाइट्स

-11 बाइट्स नूरलेफ़ के लिए धन्यवाद! "

gnuplot -e "se t png;p[-3:3]real((-$1)**x)">A

परिणामी ग्राफ को वर्तमान कार्य निर्देशिका में pngनामित छवि के रूप में सहेजता है A।

उदाहरण आउटपुट

के लिए n = 1 :

के लिए n = 2 :

— आर। कप
स्रोत

1

एक लैंगेज का उपयोग करने के लिए +1 मैं हर रोज उपयोग करता हूं। (कोई "गार्बल्ड बाइनरी बकवास" जैसे कि गोल्फ-लैंगेज ^ ^ के साथ)। इसे रोजमर्रा की स्थितियों में फिर से इस्तेमाल किया जा सकता है।

— ओलिवियर दुलक

5

आप 11 बाइट्स को संक्षिप्त रूप में उपयोग करके बचा सकते हैं:gnuplot -e "se t png;p[-3:3]real((-2)**x)">A

— Noiralef

@ नॉयरलेफ़ धन्यवाद! :)

— आर। कप

13

Pyplon 3 matplotlib के साथ , 103 72 बाइट्स

-12 DSM (एक मॉड्यूल के साथ स्थापित किया गया है करने के लिए धन्यवाद बाइट्स matplotlibकहा जाता है pylab- अजीब, लेकिन सच है! "अधिक मैटलैब की तरह एक repl में अजगर बनाने" आवश्यक कार्यक्षमता के साथ)
-18 एक परिणाम के रूप में और अधिक (pylab कई numpy कार्यों भी है!)
- 1 बाइट अजजा (धन्यवाद के arange(-60,61)/20+0jसाथ arange(121)/20-3+0j)

from pylab import*
def f(n):x=arange(121)/20-3+0j;plot(x,(-n)**x);show()

एन = 2,1

n=2 n=1

— जोनाथन एलन
स्रोत

2

क्या आप from matplotlib.pyplot import*अगर आप thepylab --matplotlib ध्वज के साथ ipython शुरू करते हैं , तो आप छुटकारा पा सकते हैं ?

— अजजा १४'१

क्या आपको iPython मिला है; क्या यह काम करता है? मुझे लगता है कि यह स्वीकार्य होगा यदि ऐसा होता है, लेकिन खुद से पूछने की आवश्यकता होगी। मेरे पास आईफ़ोन नहीं है और इसे कभी भी इस्तेमाल करने की आवश्यकता नहीं है।

— जोनाथन एलन

हाँ, --पायलैब (अजगर 2 के साथ परीक्षण) के साथ काम करता है

— अजासजा

किसी भी विन्यास फ़ाइल में गैर-मानक कुछ भी नहीं है जो प्रदर्शन कार्य कर रहा है, है ना? अगर मैं यह नहीं कहूंगा कि इस अवसर पर एक अलग उत्तर के रूप में पोस्ट करें क्योंकि यह भाषा के बदलाव का एक चतुर उपयोग है। संपादित करें: मैं देख रहा हूँ कि आप इसे वहाँ भी देख चुके हैं :)

— जोनाथन एलन

1

हाँ, मुझे याद है %pylabकि आपको सुन्नता प्रदान करता है और यदि आप एक नोटबुक में हैं, तो आपको अंत में एक शो की आवश्यकता नहीं है :)

— Ajasja

11

गणितज्ञ, 41 बाइट्स

Plot[Re[(-#)^x],{x,-3,3},PlotRange->All]&

आउटपुट बिल्कुल वैसा ही दिखाई देता है जैसा कि संख्याओं के फ़ॉन्ट को छोड़कर चुनौती में दिखाया गया है (जिसे मुझे संदेह है कि वोल्फ्राम अल्फा के साथ बनाया गया था)।

— मार्टिन एंडर
स्रोत

11

MATLAB, 35 30 बाइट्स

x=-3:.01:3;@(n)plot(x,(-n).^x)

यह किसी भी कार्य को परिभाषित करता है। आउटपुट एक नई विंडो के माध्यम से एक resizable वेक्टर ग्राफिक आउटपुट के साथ है। MATLAB plotस्वचालित रूप से y- निर्देशांक के काल्पनिक भाग को अनदेखा करता है जब तक कि आपके संबंधित एक्स-निर्देशांक प्रदान नहीं करते n=3। निम्न आउटपुट के लिए है ।

— flawr
स्रोत

10

आर, 30 बाइट्स

plot(Re((0i-n)^seq(-3,3,.05)))

`n` = 1

`n` = २

— कोनराड रूडोल्फ
स्रोत

3

ऊह सुंदर मंडलियां

— बीटा डिके

2

@BetaDecay R का डिफ़ॉल्ट रेंडरिंग बदसूरत है। डिफ़ॉल्ट के लिए तर्क यह है कि अधूरा सर्किल ओवरप्लेटेड पॉइंट्स को नहीं छिपाता है जितना भरा हुआ सर्कल / डॉट्स होता है।

— कोनराड रुडोल्फ

5

मुझे नहीं लगता कि यह बदसूरत है। यह वास्तव में अच्छा लग रहा है।

— mbomb007

1

एक्स अक्ष को गलत तरीके से लेबल किया गया है। मुझे लगता है कि आपको जरूरत हैx=seq(-3,3,.05);plot(x,Re((0i-n)^x))

— user2390246

2

@ user2390246 यह देखते हुए कि कुल्हाड़ी पूरी तरह से वैकल्पिक हैं, मुझे नहीं लगता कि यह मायने रखता है। यदि अक्ष लेबलिंग मायने रखता है, तो अन्य उत्तर भी स्केलिंग के कारण समस्याएँ हैं (उदाहरण के लिए 30-चार MATLAB उत्तर)।

— कोनराड रुडोल्फ

10

आर, 29 बाइट्स

curve(Re((0i-scan())^x),-3,3)

nस्टड के माध्यम से प्रदान किया जाता है। N = 1 के परिणाम:

और n = 2 के लिए:

— प्लेनैपस
स्रोत

nअन्य उत्तरों की तरह एक चर का उपयोग क्यों न करें और अपने उत्तर से पाँच वर्णों को काटें? वैसे भी, पागल जवाब। मैं हमेशा भूल जाता हूं curve।

— कोनराड रुडोल्फ

@KonradRudolph धन्यवाद। वास्तव में अधिकांश अन्य उत्तर पूर्वनिर्धारित नहीं हैं n। Matlab, matl, TI-Basic और mathematica उत्तर इनपुट को स्टड के रूप में लेते हैं (जहां तक मैं उन्हें समझता हूं), जबकि अजगर और VBA उत्तर एक फ़ंक्शन बनाते हैं। यहां तक कि अगर इसकी अनुमति है, तो यह सिर्फ व्यक्तिगत स्वाद की बात है: मुझे इनपुट के एक तरीके के रूप में चर को पूर्वनिर्धारित करना पसंद नहीं है।

— प्लेनैपस

क्षमा करें सुधार: matlab उत्तर कार्यों को भी परिभाषित करता है।

— प्लेनैपस

कुंआ। यह है एक कोड गोल्फ ...

— कोनराड रुडोल्फ

मैं पांडित्य या कुछ भी नहीं करना चाहता था, लेकिन वास्तव में एक समुदाय के रूप में हम मानते हैं कि पूर्वनिर्धारित चर का उपयोग करना वैध इनपुट विधि नहीं माना जाता है जब तक कि प्रश्न में स्पष्ट रूप से अन्यथा नहीं कहा गया हो।

— प्लेनैपस

8

एक्सेल VBA, 168 160 147 138 बाइट्स (100x स्केल पर पिक्सल के रूप में सेल)

^{KyleKanos के लिए 8 बाइट्स को}
^{सहेजा गया, टेलर स्कॉट के लिए 22 बाइट्स सहेजे गए}

Sub g(n)
For i=0To 1
For x=-3To 3Step.01
y=n^x*Cos([Pi()]*x)
m=IIf(y<m,y,m)
If i Then Cells(500*(1-y/m)+1,(x+3)*100+1)="#
Next x,i
End Sub

स्वरूपित, यह इस तरह दिखता है:

Sub g(n)
    For i = 0 To 1
    For x = -3 To 3 Step 0.01
        y = n ^ x * Cos([Pi()] * x)
        m = IIf(y < m, y, m)
        If i Then Cells(500 * (1 - y / m) + 1, (x + 3) * 100 + 1) = "#"
    Next x, i
End Sub

मज़ा तथ्य: VBA नहीं है एक अंतर्निहित piचर तो हम किसी कार्यपत्रक समारोह जहां यह रूप में यह मूल्यांकन करना होता है अस्तित्व।

n = 1 एन = 2

मैंने 193 बाइट्स में एक चार्ट संस्करण के साथ शुरुआत की थी, लेकिन इसके पूर्ववर्ती परिणाम नहीं मिले।

Sub c(n)
For x=-3To 3Step 0.05
r=r+1
Cells(r,1)=n^x*Cos(Atn(1)*4*x)
Next
With ActiveSheet.Shapes.AddChart(xlLine).Chart
.SetSourceData Range("A1:A121")
.Axes(xlCategory).Delete
End With
End Sub

n = 1 एन = 2

— इंजीनियर टोस्ट
स्रोत

1

क्या (-n)^xहार्डकोडिंग पाई के बजाय इसका उपयोग करना कम है ?

— बीटा डिके

1

@BetaDecay यह होगा कि अगर एक्सेल नकारात्मक गैर-पूर्णांक ay \ _ (¯) _ / _ के लिए उठाए गए ऋणात्मक संख्याओं को संभाल सके।

— इंजीनियर टोस्ट

2

क्या यह atn(1)*4पी के लिए उपयोग करने के लिए छोटा नहीं है ?

— काइल कानोस

2

@KyleKanos वास्तव में यह है, धन्यवाद। मुझे अपने कॉन्टेंट लुकिंग टेबल में वह पहचान नहीं मिली और एक इंजीनियर के रूप में, यही वह जगह है जहाँ मैं कानूनी रूप से रोकने के लिए बाध्य हूं।

— इंजीनियर टोस्ट

1

@TaylorScott यह तीन नई चालें हैं, धन्यवाद। यह 7 बाइट्स की तुलना में अधिक मूल्यवान है, इस बार उन्होंने मुझे बचाया।

— इंजीनियर टोस्ट

6

MATLAB, 35 33 बाइट्स

2 बाइट निकालने के लिए धन्यवाद @flawr!

@(n)ezplot(@(x)real((-n)^x),-3:3)

यह एक अनाम फ़ंक्शन को परिभाषित करता है। इसे इनपुट के साथ कॉल करने के लिए, फ़ंक्शन का 2उपयोग करें ans(2)(या फ़ंक्शन को एक चर जैसे कि fऔर फिर उपयोग करने के लिए असाइन करें f(2))।

आउटपुट सदिश ग्राफिक्स (resizable window) है। एक्स अक्ष पर नमूना अंतराल स्वचालित रूप से ezplotफ़ंक्शन द्वारा निर्धारित किया जाता है , लेकिन यह पर्याप्त से अधिक लगता है।

STDERR में एक चेतावनी का उत्पादन किया जाता है क्योंकि फ़ंक्शन ezplot( @(x)real((-n)^x)) को पास नहीं किया जाता है, लेकिन ग्राफ़ उत्पन्न होता है।

इसके लिए उदाहरण n = 2:

— लुइस मेंडो
स्रोत

1

ezplot = la-z-plot : डी (मैं इस एक के बारे में भूल रहा हूँ ...)

— 12

हुह। कभी नहीं पता था कि आप डोमेन को इस ezplotतरह से पास कर सकते हैं । अफसोस की बात है कि उसी के लिए नहीं कहा जा सकता है fplot, इसलिए वहाँ कोई भी बाइट नहीं बचा सकता है।

— सांचेस

@sanchises मुझे या तो पता नहीं था :-) यह त्रुटिपूर्ण विचार था

— लुइस मेंडू

5

जुपिटर नोटबुक और पायथन 3; 53 बाइट्स

%pylab
def f(n):x=arange(121)/20-3+0j;plot(x,(-n)**x)

@Jonathan Allan की बदौलत तीन बाइट बच गईं।

— Ajasja
स्रोत

दो मामूली बिट्स: यदि मैं चश्मा सही पढ़ता हूं, तो आपको (प्रभावी) बिंदुओं के बीच न्यूनतम 0.05 (0.1 नहीं) की आवश्यकता होती है, और हम इसमें शामिल होने वाले हैं 3.

— DSM

आप x=arange(-60,61)/202 बाइट्स की कीमत पर DSM द्वारा हाइलाइट किए गए मुद्दों को ठीक करने के लिए उपयोग कर सकते हैं । यदि आप इसे जोड़ते 0jहैं तो arangeइसे plot(x,(-n)**x)बचत में बदलने के लिए इस्तेमाल किया जा सकता है 4.

— जोनाथन एलन

@DSM ऑप्स, फिक्स्ड।

— अजासजा

@JonathanAllan धन्यवाद

— अजासजा

आह, मैंने आपको कुल 2 बचाया, आपने मुझे बदलकर 1 बचा लिया arange(121)!

— जोनाथन एलन

3

संलग्न पोस्ट स्क्रिप्ट; 232 बाइट्स

%!PS-Adobe-3.0 EPSF-3.0
%%BoundingBox: 0 0 500 500
%%EndComments
/n 1 def .02 setlinewidth /f{dup dup n exch exp exch 180 mul cos mul 3 div}def
250 250 translate 80 80 scale newpath -3 f moveto -3 .05 3{f lineto}for stroke
%%EOF

अब चूंकि यह एक सदिश छवि है ...

— joojaa
स्रोत

ऊह जो अच्छा है

— बीटा

3

TikZ + PGFPlots , 175 बाइट्स

\documentclass{standalone}\usepackage{tikz,pgfplots}\begin{document}\typein[\n]{}\tikz{\begin{axis}\addplot[domain=-3:3,samples=120]{\n^x*cos(180*x)};\end{axis}}\end{document}

एक पीडीएफ आउटपुट के लिए , उदाहरण के latexmk -cd -f -pdf in.texलिए , संकलित करें । संकलन के दौरान, उपयोगकर्ता को संकेत दिया जाता है n।

N = 1 और n = 2 के लिए नमूना आउटपुट (png में परिवर्तित):

एन = 1 n = 2

— जूलियन वुल्फ
स्रोत

2

मैथ.जेएस ग्राफर , 20 बाइट्स

r(n)=f(x)=re((-n)^x)

सरासर फ्लूक द्वारा, यह रेखांकन उपयोगिता टीसी है (अधिकांश भाग के लिए, अनंत लूप्स इसे दुर्घटनाग्रस्त कर देते हैं।), और स्वभाव से, यह प्राथमिक आउटपुट रेखांकन है।

यह काम किस प्रकार करता है

r(n)=एक फ़ंक्शन प्रदान करता है rजो तर्क nको अभिव्यक्ति में ले जाता है f(x)=re((-n)^x)। re((-n)^x)चुनौती विवरण पत्र के लिए बहुत अधिक पत्र है। लेकिन यह फ़ंक्शन f(x)को इसको असाइन करता है , जिसे ग्राफर निहित रूप से लाइन ग्राफ के रूप में आउटपुट करता है।

इसका परीक्षण कैसे करें

आप इस साइट का उपयोग कर सकते हैं , उस फ़ंक्शन को वहां पर पंच कर सकते हैं , फिर इसे कॉल कर सकते हैं r(input)।

उत्पादन

— Ataco
स्रोत

2

जे , 37 36 बाइट्स

मार्गदर्शन के लिए मेरे सहयोगी मार्शल का धन्यवाद। -2 फ्रॉनीफ्रॉग के लिए धन्यवाद।

बेनामी tacit उपसर्ग समारोह।

-(]plot@;9 o.^)i:@3j120[load@'plot'

-(]plot@;9 o.^)i:@3j120[load@'plot'
                        load@'plot'       NB. load plotting library
               i:@3j120                   NB. -3...3 in 120 steps
-                                         NB. negate argument
 (           ^)                           NB. raise the negated value to those exponents
 (       9 o. )                           NB. real part
 (]     ;     )                           NB. pair with the exponents
 ( plot@      )                           NB. plot it

— एडम
स्रोत

मुझे लगता है कि 20%~i:@60हो सकता है i:@3j120।

— FrownyFrog

@FrownyFrog सही। धन्यवाद।

— Adám

1

दिल्लोग एपीएल, 41 बाइट्स

⎕SE.UCMD∊'chart x(9○(-'⍞')*x←3-20÷⍨⍳121)'

यह काम किस प्रकार करता है:

⎕SE.UCMD∊'chart x(9○(-'⍞')*x←3-20÷⍨⍳121)' ⍝ Main function
⎕SE.UCMD∊                                 ⍝ User Command (called from the session object)
         'chart                           ⍝ Plot a chart with arguments:
                 (           3-20÷⍨⍳121)' ⍝ Yields the list [-3, -2.95, -2.9,..., 2.9, 2.95, 3]
                           x←             ⍝ Assign that list to x
                          *               ⍝ and use it as exponent
                    (-'⍞')                ⍝ with (-input) as base
                  9○                      ⍝ discard the complex part; this generates Re((-n)^x)
                x                         ⍝ And x.

उपयोगकर्ता कमांड ]chart, इस मामले में, दो वेक्टर तर्क लेता है, xऔर yग्राफ़ को प्लॉट करता है:

के लिये $n=1$ :

के लिये $n=2$ :

— जे। सल्ल
स्रोत

0

स्माइलबासिक, 82 बाइट्स

INPUT N
FOR I=0TO 399X=I/66.5-3GPSET I,120-POW(N,X-3*SGN(N-1))*COS(PI()*X)*120NEXT

ग्राफ पूरे स्क्रीन को भर देता है, भले ही एन 1 से कम हो।

जब N 1 से अधिक होता है, तो आप इसे विभाजित करके Y को -1 और 1 के बीच में माप सकते हैं n^3। मैं पहले से ही कर रहा हूं n^x, और n^x / n^3इसे सरल बनाया जा सकता है n^(x-3)। हालांकि, जब एन 1 से कम है, तो मुझे n^-3इसके बजाय वाई को विभाजित करना होगा। इसके बराबर है n^(x+3)।

मैं अगर , और अगर n^(x-3*sign(n-1))का उपयोग करने के लिए उपयोग कर सकते हैं-3n>1+3n<1

जल्द ही आने वाली छवियां

— 12Me21
स्रोत

0

एक्सेल VBA, 133 बाइट्स

तत्काल विंडो स्क्रिप्ट जो इनपुट से लेती है [A1]और Chartऑब्जेक्ट को ऑब्जेक्ट में आउटपुट करती Sheet1है।

[B:B]="=ROW()/20-3.05":[C:C]="=A$1^B1*Cos(Pi()*B1)":Set c=Sheet1.Shapes.AddChart(4).Chart:c.SetSourceData[C1:C121]:c.Axes(1).Delete

Ungolfed

पूर्ण Subदिनचर्या संस्करण। I / O अपरिवर्तित है।

Sub b()
    [B:B] = "=ROW()/20-3.05"                ''  Define `x`-axis
    [C1:C121] = "=A$1^B1*Cos(Pi()*B1)"      ''  Define `y`-axis in terms of input from A1
    Set c = Sheet1.Shapes.AddChart(4).Chart ''  Add line plot to Sheet1 (xlLine)
    c.SetSourceData [C1:C121]               ''  Set `y` source to match `x` in [-3,3]
    c.Axes(1).Delete                        ''  Remove erroneous axes (xlCategory)
End Sub

उत्पादन

जहां इनपुट, $n=1$

जहां इनपुट, $n=3$

— टेलर स्कॉट
स्रोत

0

जूलिया 0.6 प्लॉट.ज्ल, 46 बाइट्स के साथ

using Plots
~n=plot(real((0im-n).^(-3:.05:3)))

इसके लिए जूलिया प्रतिनिधित्व की आवश्यकता थी!

फ़ंक्शन डिफेक्शन पर बाइट्स को बचाने के लिए ऑपरेटर ओवरलोडिंग का उपयोग करके (एबी) को छोड़कर, हालांकि यहां गोल्फ के लिए बहुत कुछ नहीं है, और 0im-nइनपुट नंबर को जटिल बनाने के लिए उपयोग कर रहा हूं जहां मैं आमतौर पर उपयोग कर सकता हूं Complex(n)। यह आवश्यक है क्योंकि जूलिया में, स्थिरता के कारणों के लिए, ^ऑपरेटर केवल जटिल परिणाम देता है जब इनपुट स्वयं जटिल होता है। इसलिए यहाँ हम इसे जोड़कर एक जटिल संख्या बनाते हैं 0im। 0i।

प्लॉट्स.ज्ल पैकेज के बारे में एक अच्छी बात यह है कि यह स्वचालित रूप से आपके द्वारा इंस्टॉल किए गए प्लॉटिंग पैकेजों के आधार पर उपयोग करने के लिए बैकेंड चुनता है और आप कहां plotसे कमांड चला रहे हैं । उपरोक्त प्लॉट जीआर बैकएंड के साथ बनाया गया था , लेकिन अगर मैंने वह स्थापित नहीं किया था (या अगर मैं स्पष्ट रूप से plotly()इस तरह से मैंने इसके लिए एक कमांड चलाया ), तो यह अधिक इंटरैक्टिव प्लॉटली बैकेंड का उपयोग करता था और इसे आउटपुट करता था (जो एक बहुत दिखता है) छोटे बिट नाइटर IMO):

यहां तक कि यूनिकोड वर्ण और रंग कोड का उपयोग करके टर्मिनल में एक भूखंड को प्रिंट करने के लिए (या किसी पाठ फ़ाइल में सहेजने के लिए) एक यूनिकोडप्लॉट बैकएंड भी है । अगर मैं सीधे इसे पेस्ट करने की कोशिश करता हूं, तो SE प्लॉट अलाइनमेंट में गड़बड़ी करता रहता है, इसलिए यहां एक टर्मिनल स्क्रीनशॉट है:

पुनश्च: वैकल्पिक सूत्र, $Re((−n)^x)=n^xcos(πx)$ , एक ही लंबाई के लिए बाहर आता है:

using Plots
~n=plot(n.^(x=-3:.05:3).*cospi(x))

— sundar - मोनिका को बहाल करना
स्रोत

डांग, यह ब्रेल अक्षरों का कुछ चतुर (एब) उपयोग है।

— जकार्ही

का ग्राफ

चुनौती

उत्पादन

उदाहरण

जीतना

MATL, 22 18 16 बाइट्स

टीआई-बेसिक, 26 21 बाइट्स

बैश + ग्नुप्लोट, 56 45 बाइट्स

उदाहरण आउटपुट

Pyplon 3 matplotlib के साथ , 103 72 बाइट्स

गणितज्ञ, 41 बाइट्स

MATLAB, 35 30 बाइट्स

आर, 30 बाइट्स

n = 1

n = २

आर, 29 बाइट्स

एक्सेल VBA, 168 160 147 138 बाइट्स (100x स्केल पर पिक्सल के रूप में सेल)

MATLAB, 35 33 बाइट्स

जुपिटर नोटबुक और पायथन 3; 53 बाइट्स

संलग्न पोस्ट स्क्रिप्ट; 232 बाइट्स

TikZ + PGFPlots , 175 बाइट्स

मैथ.जेएस ग्राफर , 20 बाइट्स

यह काम किस प्रकार करता है

इसका परीक्षण कैसे करें

उत्पादन

जे , 37 36 बाइट्स

दिल्लोग एपीएल, 41 बाइट्स

यह काम किस प्रकार करता है:

स्माइलबासिक, 82 बाइट्स

एक्सेल VBA, 133 बाइट्स

Ungolfed

उत्पादन

जूलिया 0.6 प्लॉट.ज्ल, 46 बाइट्स के साथ

`n` = 1

`n` = २