Wolfram Language

Langage de base

Trouvez une séquence dans les chiffres de π

Les nouvelles fonctions SequenceCases, SequencePosition, et SequenceCount offrent de nouvelles fonctionnalités pour extraire des séquences en utilisant filtrage par motif.

Trouvez l'occurrence de la première date de sortie de Mathematica dans les chiffres de .

In[1]:=
Click for copyable input
EntityValue[ Entity["ProgrammingLanguage", "WolframLanguage"], "DateIntroduced"]
Out[1]=

Modifiez cette date à un format adapté à la recherche.

In[2]:=
Click for copyable input
EntityValue[ Entity["ProgrammingLanguage", "WolframLanguage"], "DateIntroduced"]; date = Characters[DateString[%, {"Month", "Day", "YearShort"}]]
Out[2]=

Générez les 3 millions de premiers chiffres de .

In[3]:=
Click for copyable input
pi = Characters[ToString@N[Pi, 3000000]];

SequencePosition fournit les positions auxquelles la date formatée commence et se termine.

In[4]:=
Click for copyable input
pos = SequencePosition[pi, date]
Out[4]=

Il n'apparaît qu'une seule fois dans les 3 premiers millions de chiffres π. Nous pouvons représenter cet événement d'une manière simple à l'aide d'un objet Grid.

Montrer l'entrée complète de Wolfram Language
In[5]:=
Click for copyable input
chars = Join[ Take[pi, 21], Characters["..."], Take[pi, First@pos - {14, 6}], Style[#, Orange] & /@ Take[pi, First@pos], Take[pi, First@pos + {6, 4}] ];
In[6]:=
Click for copyable input
Grid[Partition[chars, 8]]
Out[6]=

Essayez d'autres dates et trouvez votre journée ici!

Exemples connexes

de en es ja ko pt-br ru zh