Skip to main content
Search type Search syntax
Tags [tag]
Exact "words here"
Author user:1234
user:me (yours)
Score score:3 (3+)
score:0 (none)
Answers answers:3 (3+)
answers:0 (none)
isaccepted:yes
hasaccepted:no
inquestion:1234
Views views:250
Code code:"if (foo != bar)"
Sections title:apples
body:"apples oranges"
URL url:"*.example.com"
Saves in:saves
Status closed:yes
duplicate:no
migrated:no
wiki:no
Types is:question
is:answer
Exclude -[tag]
-apples
For more details on advanced search visit our help page
Results tagged with
Search options not deleted user 21693

Questions on creating visualizations from functions or data using high-level constructors such as Plot, ListPlot, Histogram, etc.

1 vote
2 answers
182 views

Sierpinski Triangle and Benford's Law (Edit)

I would like some help solving the following problem using Mathematica: Show that, no matter what the initial area of an equilateral triangle is, the sequence of areas (painted in black) of the figure …
Rubens Vilhena Fonseca's user avatar
2 votes
2 answers
105 views

Binary Distance between the two Primes

Given a prime number p, is there always a smaller positive integer exponent k such that p+2^k is also prime? We will call the smallest possible value of this exponent the k*. We could interpret this n …
Rubens Vilhena Fonseca's user avatar
1 vote

Binary Distance between the two Primes

dyb[n_] := Module[{i = 0}, If[n > 2 && PrimeQ[n], While[! PrimeQ[n + 2^i], i = i + 1;]; i]] primes = Select[Range[2, 97], PrimeQ]; resp = Table[dyb[n], {n, primes}]; Grid[Transpose[{primes, resp}], …
Rubens Vilhena Fonseca's user avatar
9 votes
3 answers
1k views

Taxicab Geometry

According to taxicab geometry, there are 1226 possible paths from A(2,5) to B(7,9), all with a distance of 9 units, |2-7|+|9-5|=9. I wanted to write a code where I could be obtaining the plots of some …
Rubens Vilhena Fonseca's user avatar
3 votes
3 answers
327 views

Parabola from a focus and a directrix

The code below is an attempt to obtain the graph of a parabola from two pieces of information: a focus and a directrix. I am not able to get the correct graphical shape of the parabola. I appreciate a …
Rubens Vilhena Fonseca's user avatar
4 votes
4 answers
225 views

Lines of intersections in a parabola

To test the parabolic sieve, my intention was for the graph to show the coordinates of two points on the parabola and the value of the intersection on the y-axis. A table with this information would a …
Rubens Vilhena Fonseca's user avatar
0 votes
3 answers
121 views

All composite numbers are crossed by the lines

I'm trying a version of the code with the concavity of the parabola upwards (y=x^2), but I'm not succeeding. I appreciate any help. Manipulate[ With[{np = NextPrime[xf]}, Plot[{Sqrt[x], -Sqrt[x]}, …
Rubens Vilhena Fonseca's user avatar
1 vote

All composite numbers are crossed by the lines

I made some adjustments to the coordinates. Manipulate[With[{np = NextPrime[xf]}, Plot[{x^2}, {x, -10, xf}, Axes -> {True, True}, Epilog -> { Opacity[0.4], Purple, Line /@ Flatten[ Outer[List, Tabl …
Rubens Vilhena Fonseca's user avatar
1 vote
2 answers
86 views

Parabolas to the right or to the left

I would like some help to make the opening (concavity) of the parabolas go to the right or left, and not up or down. Manipulate[ Plot[a (y - k)^2 + h, {y, -10, 10}, PlotRange -> {{-10, 10}, {-10, …
Rubens Vilhena Fonseca's user avatar
2 votes

Parabolas to the right or to the left

Based on the posted comments, I made the following changes: Manipulate[(*Define the quadratic function*)f[y_] := a y^2 + b y + c; (*Plot the quadratic function*) ParametricPlot[{f[y], y}, {y, -10, …
Rubens Vilhena Fonseca's user avatar