(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 12.2' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 158, 7] NotebookDataLength[ 4127, 137] NotebookOptionsPosition[ 2917, 102] NotebookOutlinePosition[ 3270, 118] CellTagsIndexPosition[ 3227, 115] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell["Basic Examples", "Subsection", TaggingRules->{}, CellID->462042388], Cell[BoxData[ RowBox[{"ResourceData", "[", TagBox["\"\\"", #& , BoxID -> "ResourceTag-Data for Maymin & Langer (2021) \"Cognitive Biases and \ Mindfulness\"-Input", AutoDelete->True], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.817562415147565*^9, 3.8175624159129353`*^9}}, CellID->257298660], Cell["Retrieve the citation:", "Text", TaggingRules->{}, CellChangeTimes->{{3.81756244273993*^9, 3.8175624434125566`*^9}}, CellID->224711628], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ResourceData", "[", RowBox[{ TagBox[ "\"\\"", #& , BoxID -> "ResourceTag-Data for Maymin & Langer (2021) \"Cognitive Biases and \ Mindfulness\"-Input", AutoDelete->True], ",", "\"\\""}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.817562321165763*^9, 3.8175623895987616`*^9}, { 3.817562449291301*^9, 3.817562449588555*^9}}, CellID->174527548], Cell[BoxData["\<\"Maymin, Philip Z.; Langer, Ellen J. (2021). \\\"Cognitive \ Biases and Mindfulness.\\\" Nature: Humanities and Social Sciences \ Communications, forthcoming.\"\>"], "Output", TaggingRules->{}, CellChangeTimes->{3.817562390873929*^9}, CellLabel->"Out[152]=", CellID->17559563] }, Open ]], Cell["Retrieve the email address of the corresponding author:", "Text", TaggingRules->{}, CellChangeTimes->{{3.8175624549782295`*^9, 3.817562458868948*^9}}, CellID->226994840], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"ResourceData", "[", RowBox[{ TagBox[ "\"\\"", #& , BoxID -> "ResourceTag-Data for Maymin & Langer (2021) \"Cognitive Biases and \ Mindfulness\"-Input", AutoDelete->True], ",", "\"\\""}], "]"}]], "Input", TaggingRules->{}, CellChangeTimes->{{3.817562398645583*^9, 3.817562406328661*^9}, 3.817562463423006*^9}, CellID->23103804], Cell[BoxData["\<\"pmaymin@fairfield.edu\"\>"], "Output", TaggingRules->{}, CellChangeTimes->{3.817562407212529*^9}, CellLabel->"Out[153]=", CellID->276933246] }, Open ]] }, Open ]] }, WindowSize->Automatic, WindowMargins->Automatic, FrontEndVersion->"12.2 for Linux x86 (64-bit) (November 16, 2020)", StyleDefinitions->"Default.nb", $CellContext`ClosingSaveDialog -> False ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[580, 22, 75, 2, 70, "Subsection",ExpressionUUID->"4025319c-1fbf-42ea-b39b-86f27cbfa611", CellID->462042388], Cell[658, 26, 401, 11, 70, "Input",ExpressionUUID->"036f371f-4da5-4bc4-ac85-44329ae8c4bc", CellID->257298660], Cell[1062, 39, 144, 3, 70, "Text",ExpressionUUID->"b332bc30-8813-4d6c-9cd7-23328786f8a5", CellID->224711628], Cell[CellGroupData[{ Cell[1231, 46, 498, 14, 70, "Input",ExpressionUUID->"97744aa2-eff6-4214-a963-ba6884d197db", CellID->174527548], Cell[1732, 62, 297, 6, 70, "Output",ExpressionUUID->"669af285-8c96-486c-8707-16b4e03d464c", CellID->17559563] }, Open ]], Cell[2044, 71, 178, 3, 70, "Text",ExpressionUUID->"03f1048a-8dc8-46da-bf5f-b92c6b34bcc5", CellID->226994840], Cell[CellGroupData[{ Cell[2247, 78, 477, 14, 70, "Input",ExpressionUUID->"ca114118-c903-40ef-9734-8860f2a73306", CellID->23103804], Cell[2727, 94, 162, 4, 70, "Output",ExpressionUUID->"1a66a9c8-b6b6-4c53-8240-7b7abbabe481", CellID->276933246] }, Open ]] }, Open ]] } ] *) (* End of internal cache information *)