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 le 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 en 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 mise en forme commence et se termine.

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

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

Afficher 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 jour ici !

Exemples connexes

de en es ja ko pt-br ru zh