https://community.wolfram.com RSS Feed for Wolfram Community showing any discussions tagged with Raspberry Pi sorted by active. https://community.wolfram.com/groups/-/m/t/558199 In a [previous thread](http://community.wolfram.com/groups/-/m/t/444854), it has been noted that if a user on a Raspberry Pi is not a member of the video group, the user will not be able to use *Mathematica* and instead will be stuck in an inescapable Product Activation dialog. It's a weird error that results from the way Wolfram ensures that their (in this case, free) software is running on the RPi (or so I've heard). I have run in to the same problem, although this time, it is not due to the groups issue mentioned earlier. I am confident that it is the product activation issue, since I am able to get around it via `sudo wolfram`. The problem came up in a very foolish way. I have multiple RPi's on my desk, and typically access them through SSH terminals on my main PC. I just purchased the 3.5" PiTFT from Adafruit and put that on one of the RPi's. When following their installation routine, which requires a modified kernel, I accidentally entered all the commands on my non PiTFT RPi. It was then that I noticed that *Mathematica* no longer worked on the RPi. I've tried adding new users, running `dpkg reconfigure wolfram-engine` and am now ready to revert back to an older backup. I'd like to exhaust my troubleshooting options, however, before I go that route. **To make a long story short** are there other checks similar to the video user-group that can be shared so that I (hopefully no one is stupid enough to repeat this error to make it a 'we') can get my (non sudo'ed) wolfram back? BoB LeSuer 2015-09-03T01:27:12Z https://community.wolfram.com/groups/-/m/t/3578728 ![Wolfram & Raspberry Pi 5 — Part 3: neural networks, image processing and physics simulations][1] &[Wolfram Notebook][2] [1]: https://community.wolfram.com//c/portal/getImageAttachment?filename=WolframandRaspberryPi5Part3.png&userId=20103 [2]: https://www.wolframcloud.com/obj/375d99eb-3120-4500-8340-2335d618812a Bart ter Haar Romeny 2025-11-20T18:57:58Z https://community.wolfram.com/groups/-/m/t/3578212 ![Wolfram & Raspberry Pi 5 — Part 2: compilation and mathematical visualization][1] &[Wolfram Notebook][2] [1]: https://community.wolfram.com//c/portal/getImageAttachment?filename=Complilationandmathematicalvisualization.png&userId=20103 [2]: https://www.wolframcloud.com/obj/79e1b917-7c75-49f9-8759-e92375c40c34 Bart ter Haar Romeny 2025-11-19T19:56:59Z https://community.wolfram.com/groups/-/m/t/3577991 ![Wolfram & Raspberry Pi 5 — Part 1: STEM lab setup and real-time data][1] &[Wolfram Notebook][2] [1]: https://community.wolfram.com//c/portal/getImageAttachment?filename=STEMlabsetupandreal-timedata.png&userId=20103 [2]: https://www.wolframcloud.com/obj/e7ca3b71-26d7-44dc-b53d-dca49aba9f6e Bart ter Haar Romeny 2025-11-19T19:28:05Z https://community.wolfram.com/groups/-/m/t/3444192 Team, I am very rusty on this one. I have been about 4 years away and returning to a new RB Pi 5.o. The problem is that I do not know how to get started with installation of Mathematica. I downloaded an Installation script. But from here I am lost. I click the file, but only opens a text file with a code. Can not get to go any further. Jose Calderon 2025-04-14T23:29:40Z https://community.wolfram.com/groups/-/m/t/3558969 ![enter image description here][1] &[Wolfram Notebook][2] [1]: https://community.wolfram.com//c/portal/getImageAttachment?filename=1136jellyfish-optimize.gif&userId=20103 [2]: https://www.wolframcloud.com/obj/c6f98f70-9500-43f0-9efd-3c2a919ec8a2 Bart ter Haar Romeny 2025-10-10T14:23:00Z https://community.wolfram.com/groups/-/m/t/3558592 ![Wolfram & Raspberry Pi 5: Complete STEM applications, advanced visualizations & GPIO sensor support][1] &[Wolfram Notebook][2] [1]: https://community.wolfram.com//c/portal/getImageAttachment?filename=STEMstudent%27sdream.png&userId=20103 [2]: https://www.wolframcloud.com/obj/37751904-8fa2-44eb-a492-7983fdc9dcd8 Bart ter Haar Romeny 2025-10-09T17:30:45Z https://community.wolfram.com/groups/-/m/t/3558367 Hello I tried using the shell script from wolfram website to install 14.2 on Trixie Didn’t work due to failed dependencies… So I downloaded these two pkgs manually from ftp.debian.org libprec3_8.39-13_arm64.deb; libwayland-egl1-mesa-22.3.6-1+deb12u1_arm64.deb And after installing them, I can proceed with the installation… Any suggestions if there is a better way? Ed Wong 2025-10-09T02:29:04Z https://community.wolfram.com/groups/-/m/t/3465203 I'm a newbie. I installed Mathematica on my Raspberry Pi 5, running Linux (version 6.12.25+rpt-rpi-2712). When I access it via RealVNC with a screen size of 1280 x 1024, the loading whirlpool appears, but after 20 seconds, nothing happens. Where are the error logs? Any suggesion? Mathematica problem or should blame Vnc? Thanks in advance Emine Simsek 2025-05-21T09:16:17Z https://community.wolfram.com/groups/-/m/t/3147950 My new Raspberry Pi 5 runs the latest version of Raspberry OS (64-bit with the full set of applications) created by Raspberry Pi imager 1.8.5. Mathematica 13.3.1 is ialso nstalledll. It works properly with symbolically taped functions and operators but does not insert symbols clicked on panels of BasicMathAssistent into the notebook window. What is the matter? PS. There is no such problem with the same version of Mathematica installed on my Raspberry Pi 4 with previous version of 64-bit OS. Vladimir Rok 2024-03-26T15:34:57Z https://community.wolfram.com/groups/-/m/t/802967 Awesome. That's my one-word summary of [HackUPC][1] this past weekend. Seeing 400 international students take the initiative to turn dreams into reality was an inspiring experience for me and my twin brother [@Jofre Espigule][at0]. ![enter image description here][2] **Friday's night opening ceremony at the Sports Pavilion of *Universitat Politècnica de Catalunya*.** ![Opening Talk][3] Hack UPC took place in UPC's North Campus in sunny Barcelona. And it was made possible thanks to [Miquel Llobet][4] (founder of Hack UPC), the [Major League Hacking][5], the sponsors (Wolfram, Skyscanner, Everis,...), and an amazing team of volunteers. Here are the [TravelDirections][6] to Hack UPC: ![HackUPC venue][7] Jofre and I got some cool Wolfram swag to give away. We also demoed a bunch of code examples to people interested in the the [Wolfram Language][8]. And we helped several teams that came to us with great ideas. Below is one of the hacks I demoed there, a "Weather Station in a Snap" similar to [@Arnoud Buzing][at1] Arduino Yún [weather station][9] but using the new [Sense HAT][10] for the [Raspberry Pi][11]. hat = DeviceOpen["SenseHAT"]; bin = CreateDatabin[]; RunScheduledTask[DatabinAdd[bin,<|"temp" -> DeviceRead[hat, "Temperature"], "hum" -> DeviceRead[hat, "Humidity"], "pres" -> DeviceRead[hat, "Pressure"]|>], 120] ![Weather Station][12] Temperature, humidity and pressure measurements were being added in a regular basis at this databin: https://wolfr.am/aDkxtY91. Now let's take a look at some great Wolfram projects done by students at Hack UPC. The first project that I want to share with you was about cryptography. And it was carried out by two students, Xavier Perranau and Arnau Bordas. Right after signing in to [WOLFRAM DEVELOPMENT PLATFORM][13] they got familiarized with functions covered in the WLanguage Guide about [Cryptographic Number Theory][14]. Their next step consisted in developing a cloud service to allow users send encrypted messages. And after some trial and errors, they ended up adapting the example [Hide Secret Messages in Images][15] from the [WL Code Gallery][16]. They called their project [Steganography a la Wolfram][17] which allows users to drag and drop an image in two cloud-deployed [FormFunction][18] to wether hide a text message on it or decipher a message previously inserted in the image. Here is how it works. A function called **InsertSecretMessage** is defined to insert a string into a photo: InsertSecretMessage[carrierImage_Image, mesg_] := Block[{carrierBytes, pixelChannels, secretBits, secretBytes}, carrierBytes = BitAnd[ImageData[carrierImage, "Byte"], 254];secretBits = Flatten[IntegerDigits[ToCharacterCode[ToString[mesg, InputForm, CharacterEncoding -> "ASCII"]], 2, 8]]; secretBytes = Fold[Partition, PadRight[Join[IntegerDigits[Length[secretBits], 2, 48], secretBits], Times @@ Dimensions[carrierBytes]], Reverse[Rest[Dimensions[carrierBytes]]]]; Image[carrierBytes + secretBytes, "Byte"]] Then, an [advanced FormFunction][19] with four fields named "Message","Image","ByEmail" and "SendTo" is cloud-deployed with the **InsertSecretMessage** function added inside a conditional to see if the user wants to send the image by email with [SendMail][20] or just generate it on the Wolfram Cloud: CloudDeploy[FormFunction[{"Message"->"String","Image"->"Image","ByEmail"->{True,False}, "SendTo"-><|"Interpreter"->"EmailAddress","Input"->"nomail@exemple.com"|>}, If[#ByEmail==True,SendMail[#SendTo,{"Email from Wolfram",InsertSecretMessage[#Image,#Message]}],InsertSecretMessage[#Image,#Message]]&, AppearanceRules-><|"Title"->"Wolfram Steganography Insertion","Description"->"Insert your plaintext message here and we will add it to the image of your choice."|>, FormTheme->"Black"],"insert",Permissions->"Public"] https://www.wolframcloud.com/objects/user-bb7ad2a9-a624-45e5-a867-8da9c0832887/insert ![insert][21] To get back the previously given string, an **ExtractSecretMessage** function is declared and inserted in the following simple [FormFunction][22]. ExtractSecretMessage[img_Image] :=Block[{secretData, messageLength}, secretData = Flatten[BitAnd[ImageData[img, "Byte"], 1]]; messageLength = FromDigits[Take[secretData, 48], 2]; secretData = Partition[Drop[secretData, 48], 8]; ToExpression[ FromCharacterCode[FromDigits[#, 2] & /@ Take[secretData, messageLength]]] ] CloudDeploy[FormFunction["Image"->"Image",ExtractSecretMessage[#Image]&, AppearanceRules-><|"Title"->"Wolfram Steganography Extraction","Description"->"Insert your image here and you will get the Text"|>, FormTheme->"Black"],"extract",Permissions->"Public" ] https://www.wolframcloud.com/objects/user-bb7ad2a9-a624-45e5-a867-8da9c0832887/extract ![extract][23] The project awarded with the **Skyscanner Prize** was [GrooveScanner][24]: *quality events on a budget because planning just got easy*. A project developed by a group of polish students that consisted in building a service that searches for cheapest most convenient flight and nearest accommodation to the venue requested. What makes it unique is the combination of Skyscanner API and [Wolfram Alpha API for Transportation][25]. ![GrooveScanner][26] ![WA airports][27] **Finally, the project that won the Best Use of Wolfram Tech Award was** .... [DriveFlyTeleport][28]! *Sightseeing: The Smart Way*. Given three main constrains which are: time, money and the topics a person is interested in, the system determines which places in the area (museums, monuments, places of interest in general) are the best fit. It uses a [Wolfram Cloud API][29] and a twitter handle of any given user to get the text content from his timeline and analyze it to see which of the travel options may fit him best: https://github.com/adamszewe/HackUPC-Wolfram ![DriveFlyTeleport][30] Congratulations to all HackUPC participants for coming up with such amazing projects! http://hackupc2016.devpost.com/submissions [at0]: http://community.wolfram.com/web/jofreep [at1]: http://community.wolfram.com/web/arnoudb [at2]: http://community.wolfram.com/web/sherlock [1]: http://hackupc2016.devpost.com/ [2]: http://community.wolfram.com//c/portal/getImageAttachment?filename=CbmzybPWwAAN8rk.jpg&userId=56204 [3]: http://community.wolfram.com//c/portal/getImageAttachment?filename=Opening.jpg&userId=56204 [4]: https://twitter.com/mllobet [5]: https://mlh.io/ [6]: https://reference.wolfram.com/language/ref/TravelDirections.html [7]: http://community.wolfram.com//c/portal/getImageAttachment?filename=CbleDr1VIAEiXw7.png&userId=56204 [8]: http://www.wolfram.com/language/ [9]: http://blog.wolfram.com/2015/03/17/build-your-own-weather-station-in-a-snap-with-the-wolfram-cloud/ [10]: http://reference.wolfram.com/language/ref/device/SenseHAT.html [11]: http://www.wolfram.com/raspberry-pi/ [12]: http://community.wolfram.com//c/portal/getImageAttachment?filename=Weather.png&userId=56204 [13]: https://www.wolfram.com/development-platform/ [14]: http://reference.wolfram.com/language/guide/CryptographicNumberTheory.html [15]: https://www.wolfram.com/language/gallery/hide-secret-messages-in-images/ [16]: https://www.wolfram.com/language/gallery/ [17]: http://devpost.com/software/steganography-a-la-wolfram [18]: http://reference.wolfram.com/language/ref/FormFunction.html [19]: http://reference.wolfram.com/language/tutorial/AdvancedWebFormCreation.html [20]: https://reference.wolfram.com/language/ref/SendMail.html [21]: http://community.wolfram.com//c/portal/getImageAttachment?filename=insert.png&userId=56204 [22]: http://reference.wolfram.com/language/ref/FormFunction.html [23]: http://community.wolfram.com//c/portal/getImageAttachment?filename=extract.png&userId=56204 [24]: http://devpost.com/software/groovescanner [25]: https://www.wolframalpha.com/examples/Transportation.html [26]: http://community.wolfram.com//c/portal/getImageAttachment?filename=1939grooveScanner.jpg&userId=56204 [27]: http://community.wolfram.com//c/portal/getImageAttachment?filename=WA_airport_info.jpg&userId=56204 [28]: http://devpost.com/software/driveflyteleport [29]: https://reference.wolfram.com/language/guide/CreatingAnInstantAPI.html [30]: http://community.wolfram.com//c/portal/getImageAttachment?filename=DriveFlyTeleport.jpg&userId=56204 Bernat Espigulé 2016-02-25T18:07:31Z https://community.wolfram.com/groups/-/m/t/497883 In this post I show how to send and receive SMS messages using a GSM module connected to a Raspberry Pi computer. This enables the development of applications in the R-Pi which can be controlled remotely with a cell phone or any other device connected to a cellular network. Material needed: 1. The R-Pi computer (I used R-Pi model B+) 2. [SIM908 GSM][1] module (see the attached notebook for a complete description of the module and how it is connected to the R-Pi) ![enter image description here][2] The way in which the module works is by sending commands as text strings over the serial port. The module responds to these commands in a way which we can read by retrieving the buffer data of the serial port, as we illustrate below. The structure of the comand is "AT+some_instruction". The complete list of commands and their meanings can be found in the module manual. In this example we shall only explain the commands which we need. The module is attached to the serial port of the R-Pi computer. We use DeviceOpen to be able to write and read data on this port: serial = DeviceOpen["Serial", {"/dev/ttyAMA0", "BaudRate" -> 115200}] Commands are sent by means of strings ended with the character \r is which is added to indicate the "carriage return" (if the commands were typeset with a computer keyboard then this is just the enter key). For example the simplest command is the string "AT \r" which we send with DeviceWrite. DeviceWrite[serial, "AT\r"] The answer of the module is stored in binary form in the device buffer and we use DeviceReadBuffer as shown: FromCharacterCode@DeviceReadBuffer[serial] The structure of this answer is similar for all commands: the module returns the command entered and, if the command was successfully executed, the module response followed by the value "OK". If the command cannot be executed (for example due to a syntax error) the module returns "ERROR" instead of "OK". Next we enter the PIN number of the SIM card in the module. This is done as follows (replace **** by your own PIN number. Remember that entering the wrong PIN at least 3 times will block your SIM card. ) DeviceWrite[serial, "AT+CPIN=****\r"]; FromCharacterCode@DeviceReadBuffer[serial] ## Sending a SMS ## First of all we set the SMS mode to text DeviceWrite[serial, "AT+CMGF=1\r"]; FromCharacterCode@DeviceReadBuffer[serial] We insert the phone number the SMS is going to be sent to (the number used here is fictitious, you need to replace this number by your own cell phone destination). DeviceWrite[serial, "AT+CMGS=\"11192522\"\r"]; FromCharacterCode@DeviceReadBuffer[serial] The ">" which you see in the response is the prompt which confirms that we can start typing the SMS text. We send the SMS text to the serial port: DeviceWrite[serial, "Sent from my RPi"]; FromCharacterCode@DeviceReadBuffer[serial] Once finished with the typing we need to send the key combination Ctrl-Z to indicate it. Ctrl-Z corresponds to the hex code 0x1A which in base 10 is the number 26: DeviceWrite[serial, FromCharacterCode[{26}]] ; FromCharacterCode@DeviceReadBuffer[serial] The module response should confirm that the SMS was sent. In my case this response reads +CMGS: 124 followed by OK. After some time the message will be received by the recipient's phone. ## Reading a SMS from the SIM card ## Again we choose the SMS tex mode: DeviceWrite[serial, "AT+CMGF=1\r"]; Next we select the SIM card memory to read the messages in DeviceWrite[serial, "AT+CPMS=\"SM\",\"SM\",\"SM\"\r"]; FromCharacterCode@DeviceReadBuffer[serial] In my case the output is a list of the form +CPMS: 3,40,3,40,3,40. This means that there are 3 messages stored of a maximum storage capacity of 40 messages (see the module documentation to find out why 3 memories "SM" are reported). We read the third message (adapt this to the output you got in the previous step) DeviceWrite[serial, "AT+CMGR=3\r"]; FromCharacterCode@DeviceReadBuffer[serial] In addition to the SMS message text, the module returns the sender's phone number (in this example the number is fictitious), the sending date and time and the message status "REC UNREAD" which means that the message wasn't read before. We can import the SMS text with ImportString ImportString[%, "Table"] %[[-3]] [1]: http://www.cooking-hacks.com/gprs-gps-quadband-module-for-arduino-sim908 [2]: /c/portal/getImageAttachment?filename=20150518_100159.jpg&userId=11733 Alfonso Garcia-Parrado 2015-05-16T18:05:07Z https://community.wolfram.com/groups/-/m/t/477658 See full video here: https://youtu.be/OLVH-2cFiGg ![enter image description here][1] So, my desk is getting pretty cluttered; on one side of the desk sits a pile of ungraded papers; on the other side of the desk a pile of unopened static-protection envelopes of integrated circuits. At the moment, I felt like I needed to call for help - to send out a distress signal. That reminded me of my younger years when I would watch my Dad in front of his amateur radio setup. I never learned Morse code and was always impressed with his ability to communicate across the world with dits and dahs. The trip down memory lane got me thinking about a mini-project that would help me learn about programming microcontrollers and allow me to procrastinate on the grading just a little bit more. I have at my disposal a Raspberry Pi (model B) and the ATMega328p microcontroller. I don't have a programmer for the microcontroller so I need the RPi to do that. Fortunately, there are a number of resources around the web to help out with this setup. I could point you to a bunch of links (and here they are to keep me honest, [1](http://pi.gadgetoid.com/article/building-the-pico-piduino), [2](http://pi.gadgetoid.com/article/programming-your-pico-piduino) and [3](http://raspberryalphaomega.org.uk/2014/06/15/build-an-arduino-on-a-raspberry-pi/) ), but I'll also walk through the process as well, because it bothered me that I had to do a whole bunch of web searching, to find these bits and pieces. Better to do it all in one place. Hardware setup -------------- Below is a fritzing diagram of my setup. Note that I have a very minimal microcontroller configuration. I make no attempt to either optimize or protect the microcontroller. It is running off of the 3.3V line of the RPi and I will program it through the SPI interface and communicate with it through the serial UART interface. I use one of the digital out pins to power the LED. ![enter image description here][2] RPi setup --------- I needed to do a few things here. First, some software. To program the microcontroller, I am using avrdude, which is installed by doing this: <!-- language: lang-sh--> sudo apt-get install arduino wget http://project-downloads.drogon.net/gertboard/avrdude_5.10-4_armhf.deb sudo dpkg -i avrdude_5.10-4_armhf.deb sudo chmod 4755 /usr/bin/avrdude It'll also be important to tell your RPi that you plan to use the UART for your own purposes; the default behavior is to allow console acess throught the TX/RX lines. You can disable this behavior easily through `raspi-config` under the advanced options. There are a number of not-so-obvious but straightforward steps that need to be performed to complete the microcontroller setup. First, in any folder in which you will be creating a project, you'll need a `makefile` which looks something like this: ARDUINO_DIR=/usr/share/arduino BOARD_TAG = bob ARDUINO_PORT = /dev/ttyAMAO ARDUINO_LIBS = include /usr/share/arduino/Arduino.mk The big difference is going to be the 2nd line. I called my microcontroller "bob" and he has a profile that is very similar to the profile for the "uno" microcontroler except for one minor difference; "bob" has a much lower clock frequency. One reason for this is because I forgot to buy a 16 MHz crystal when I bought the ATMega328p. The 2nd is that I want to make sure that the microcontroller is not drawing too much current from the RPi, so I keep it running only as fast as I need it to. Essentially, I modified the file /usr/share/arduino/hardware/arduino/boards.txt to contain an additional entry that looks just like the one for uno except that the symbol names are prefixed with bob instead of uno and the CPU line is 1000000L. We should be good to go at this point, and can check to see if that is true by doing avrdude -p m328p -c gpio Code ---- I made a file called morse.ino, which looks a lot like c with some additional libraries to make writing to and reading from the microcontroller's pins a bit easier. <!-- language: lang-c--> #define LED 7 #define DAH 300 #define DIT 150 #define CPAUSE 100 void setup(){ Serial.begin(9600); Serial.setTimeout(1); pinMode(LED, OUTPUT); } void loop (){ if (Serial.available()) { char ser = Serial.read(); switch (ser) { case '.': digitalWrite(LED, HIGH); delay(DIT); digitalWrite(LED, LOW); delay(CPAUSE); break; case '-': digitalWrite(LED, HIGH); delay(DAH); digitalWrite(LED,LOW); delay(CPAUSE); break; case ' ': delay(3*CPAUSE); break; } } } We can compile this by typing make and then flash the microcontroller with avrdude -p m328p -c gpio -e -U flash:w:build-cli/morse.hex Wolfram ------- <!-- language: lang-mma--> Now let's hop on over to wolfram to make sure everything is working. We can open the serial device with dev = DeviceOpen["Serial","/dev/ttyAMA0"] and after having flashed the microcontroller with the code above, sending a "." or "-" will cause the led on pin 7 to blink. DeviceWrite[dev,"."] Lastly, I created a small Mathematica package that contains a couple functions to convert a string of alphanumeric text into morse code and fires that off to the microcontroller: (I grabbed the morse code symbol from [this source](http://mathematica.stackexchange.com/q/66267/7167)). BeginPackage["ArduinoMorse`"] morsecode::usage = "List of rules to convert characters to morse code" createMorseString::usage = "Converts a string of characters to morse code" blinkMorseString::usage = "Blinks morse code" Begin["`Private`"] morsecode = (#1 -> Characters[#2]) & @@@ { {"a", ".-"}, {"b", "-..."}, {"c", "-.-."}, {"d", "-.."}, {"e", "."}, {"f", "..-."}, {"g", "--."}, {"h", "...."}, {"i", ".."}, {"j", ".---"}, {"k", "-.-"}, {"l", ".-.."}, {"m", "--"}, {"n", "-."}, {"o", "---"}, {"p", ".--."}, {"q", "--.-"}, {"r", ".-."}, {"s", "..."}, {"t", "-"}, {"u", "..-"}, {"v", "...-"}, {"w", ".--"}, {"x", "-..-"}, {"y", "-.--"}, {"z", "--.."}, {"0", "-----"}, {"1", ".----"}, {"2", "..---"}, {"3", "...--"}, {"4", "....-"}, {"5", "....."}, {"6", "-...."}, {"7", "--..."}, {"8", "---.."}, {"9", "----."} }; Clear[createMorseString]; createMorseString[str_String]:=str//Characters//ToLowerCase//(#/.morsecode &)//Flatten//StringJoin; Clear[blinkMorseString]; blinkMorseString[dev_DeviceObject,str_String]:=DeviceWrite[dev,str] End[]; EndPackage[]; We can now do something like blinkMorseString[dev,createMorseString["SOS"]] and voila, my microcontroller is sending a morse code distress signal, probably because the pile of ungraded lab reports is toppling onto my hardware! I made a [short video][3] showing how the first 7 letters of the alphabet look. It's riveting. [1]: https://community.wolfram.com//c/portal/getImageAttachment?filename=morseduino-optimize.gif&userId=20103 [2]: /c/portal/getImageAttachment?filename=m328ptopi.JPG&userId=61884 [3]: https://www.youtube.com/watch?v=OLVH-2cFiGg BoB LeSuer 2015-04-11T22:42:29Z https://community.wolfram.com/groups/-/m/t/3252066 Hi there, The attached Mathematica notebook file is coded on MacOS using Mathematica 14.0, but does not work on RP 4 and RP 5: [a related thread on the Raspberry forum][1]. I noticed that only the first output block works in Wolfram Player. As far as I know, the Mathematica on RP is a full version of Mathematica. Also, Wolfram Player must be able to execute the output cell. But why are some code snippets in input cells and the graphics in output cells incompatible in different environments? Is this a bug that will be fixed? [1]: https://forums.raspberrypi.com/viewtopic.php?t=375393 PyoungRyang Ko 2024-08-20T10:44:30Z https://community.wolfram.com/groups/-/m/t/1057588 My project, Parallel Mathematica Environment on the RaspberryPi using OOP, is a sample application of **Object Oriented Programming for the Mathematica** cluster computing, implemented with a Mac and three RaspberryPi Zero connected with a USB hub and three USB cables. Basic idea is to deploy a constructed instance image to calculating servers (RaspberryPi) and send messages to the instance. [OOP on the Mathematica is already developed and shown][1] in this community, and further detail is shown on [slidesshare][2] titled of "OOP for Mathematica." ![enter image description here][3] ---------- Preparing for RaspberryPi Zero is as follows using SSH connection from a Mac, - naming each Zero as raspberypi,raspberrypi1,raspberrypi2,... - set the server program "init" to each RaspberryPi, init is, $ cat init While[True, Run[“nc -l 8000>input”]; temp=ReleaseHold[<<input]; temp >>output; Run[“nc your-mac-hostname.local 8002<output”] ] where, socket numbers must be identical. - Run Mathematica manually, and wait the booting Mathematica up. $ wolfram <init& Checking each RaspberryPi is useful as, $ nc -l 8002 >output|nc raspberrypi.local 8000 <<EOF > 10! > EOF $ cat output 3628800 ---------- Cluster controller program on a Mac is, - set directory SetDirectory[NotebookDirectory[]]; - setup socket communication process com1="nc -l 8002 >output1 |nc raspberrypi.local 8000 <input1"; com2="nc -l 9002 >output2 |nc raspberrypi1.local 9000 <input2"; com3="nc -l 9502 >output3 |nc raspberrypi2.local 9500 <input3"; - set object property obj={ <|"name"->node1,"comm"->com1,"in"->"input1","out"->"output1","p"->{2000,3500}|>, <|"name"->node2,"comm"->com2,"in"->"input2","out"->"output2","p"->{3501,4000}|>, <|"name"->node3,"comm"->com3,"in"->"input3","out"->"output3","p"->{4000,4500}|>}; - define calculation server class, where is a sample Mersenne prime number calculation new[nam_]:=Module[{ps,pe}, mersenneQ[n_]:=PrimeQ[2^n-1]; setv[nam[{s_,e_}]]^:={ps,pe}={s,e}; calc[nam]^:=Select[Range[ps,pe],mersenneQ] ]; - construct instances Map[new[#name]&,obj]; - deploy instances to calculation servers Map[Save[#in,#name]&,obj]; Map[Run[#comm]&,obj]; - send message to each instance Map[Put[Hold@setv[#name[#p]],#in]&,obj]; Map[Run[#comm]&,obj]; - start calculation Map[Put[Hold@calc[#name],#in]&,obj]; proc=Map[StartProcess[{$SystemShell,"-c",#comm}]&,obj] - wait for the process termination (mannualy in this sample code) Map[ProcessStatus[#]&,proc] {Finished,Finished,Finished} - gather the results Map[FilePrint[#out]&,obj]; {2203, 2281, 3217} {} {4253, 4423} [1]: http://community.wolfram.com/groups/-/m/t/897081?p_p_auth=o5qxZhNR [2]: https://www.slideshare.net/kobayashikorio/oop-for-mathematica [3]: http://community.wolfram.com//c/portal/getImageAttachment?filename=2017-04-10.jpg&userId=897049 Hirokazu Kobayashi 2017-04-10T01:15:22Z https://community.wolfram.com/groups/-/m/t/503296 In this post I show how the Wolfram Language enables us to build a geolocation device with a Rasberry Pi and the GSM module SIM908 (see [this previous post][1] for futher details about this module ). The module SIM908 includes a GPS and it is sold to develop geolocation applications. Usually this development involves a fair amount of code in other traditional languages and in this example I show how the Wolfram Language makes it possible to program a geolocator in fewer lines of code. The way in which the geolocator works is that it receives a SMS with a password string and after checking that the password is correct, sends a SMS to another cell phone with the geographic coordinates of the place where the geolocator is. ![enter image description here][2] The code shown in this post can be adapted to other situations such as the remote control of a R-Pi or devices connected to it. The only requirement is that the R-Pi is placed in a region with cellular network coverage. **Material:** 1. A R-Pi computer (I used model B+). 2. SIM908 GSM module available from a number of vendors (I only tested the module sold [here][3]). 3. A working SIM card of a cell phone. ## Description ## The set up of the GSM module is the same as in [this post][4] and we assume that you are familiar with the explanations given there about how the module is accessed and controlled using the Wolfram Language. The difference is that now we shall control the module by means of a program run as a script. The complete code of this program is the following (* Open serial port *) serial = DeviceOpen["Serial", {"/dev/ttyAMA0", "BaudRate" -> 115200}]; (* Unlock SIM card by sending its PIN code *) DeviceWrite[serial, "AT+CPIN=****\r"]; (* Switch GPS on *) DeviceWrite[serial, "AT+CGPSPWR=1\r"]; (* Reset GPS *) DeviceWrite[serial, "AT+CGPSRST=0\r"]; (* Set SMS mode to text *) DeviceWrite[serial, "AT+CMGF=1\r"]; (* Get location from GPS *) Location[] := Module[{nmea, lat, long}, DeviceWrite[serial, "AT+CGPSINF=0\r"]; Pause[5]; nmea = ImportString[FromCharacterCode@DeviceReadBuffer[serial], "Table"]; nmea = nmea[[-2]]; nmea = First@StringSplit[nmea, ","]; long = ToExpression@nmea[[2]]; lat = ToExpression@nmea[[3]]; (* Transform to decimal lat long *) lat = IntegerPart[lat/100] + 100/60 (lat/100 - IntegerPart[lat/100]); long = IntegerPart[long/100] + 100/60 (long/100 - IntegerPart[long/100]); {lat, long} ] (* Flush serial port buffer (allow some time to process the previous set of instructions) *) Pause[5]; DeviceReadBuffer[serial]; (* Loop to query unread SMS messages *) While[True, sms = FromCharacterCode@DeviceReadBuffer[serial]; Pause[5]; sms = ImportString[sms, "Table"]; If[sms =!= {}, (* Flush serial port buffer *) DeviceReadBuffer[serial]; (* Get unread SMS *) DeviceWrite[serial, "AT+CMGL=\"REC UNREAD\"\r"]; Pause[5]; message=FromCharacterCode@DeviceReadBuffer[serial]; message=ImportString[message,"Table"]; Print[message]; message=Part[message,-3]; Print[message]; (* Check that sms text message matches a pre-defined string *) If[message === {"position"}, (* Get lat long *) loc = ToString@Location[]; (* Send location via SMS to destination cell phone in this case the number 111111111 *) DeviceWrite[serial, "AT+CMGS=\"111111111\"\r"]; DeviceWrite[serial, loc]; DeviceWrite[serial, FromCharacterCode[{26}]]; Pause[10] ]; (* Flush serial port buffer *) DeviceReadBuffer[serial] ] ] Let us explain the code step by step. The way the module works is by sending commands over the serial port with DeviceWrite and retrieving the module answer to these commands by reading the contents of the serial port buffer with DeviceReadBuffer. See [here][5] and [here][6] for more details. The meaning of the commands in the first couple of lines was already explained in [this post][7] The line DeviceWrite[serial, "AT+CGPSPWR=1\r"]; switchs the embedded GPS on (by default it is turned off). Once the GPS is on it is accessed and controlled with a suite of commands available for that purpose. They are described in the module manual and here we just explain those commands we use. The command DeviceWrite[serial, "AT+CGPSRST=1\r"]; resets the GPS in "autonomy mode". This is useful if it has been been used recently because it will reduce the time a satellite fix takes. For a first time usage a "cold reset" is the recommended option and the command is DeviceWrite[serial, "AT+CGPSRST=0\r"]; After doing the reset in either way, the GPS starts tracking satellites. We can query the progress with the command DeviceWrite[serial, "AT+CGPSINF=0\r"]; Once a fix is achieved this command returns a number of parameters including the position (latitude & longitude) the date and the elevation. To use this information later we have the function Location[] which includes the above command and parses its output returning the latitude and longitude as decimal numbers. After having sent all the previous commands we need to remove their outputs from the serial port buffer as we do not need them in our program (and we need to have this buffer cleared to process the output of further commands). This is done as follows: Pause[5]; DeviceReadBuffer[serial]; Once the contents of the buffer are read, it is cleared and we can get the output of the commands which we send next. The reason we used Pause[5] before reading the buffer contents is to make sure that the buffer had enough time to be filled with the output of the previous commands (if we didn't do this the buffer might not be entirely cleared after executing DeviceReadBuffer). We are now all set to start our main job which is carried out in the While loop. In this loop we read the contents of the serial port buffer every 5 seconds and check the response. When a SMS arrives it generates a so-called "unsolicited response code" which reads +CMTI plus some information. We are not interested in the specific form of the unsolicited code, we only want to detect its presence and this is done with the boolean statement sms =!= {} If this returns True then we know that a SMS arrived and then we start its processing. Essentially what we do is reading the SMS and checking that its text agrees with a predefined string which is "position". When that happens then a SMS is sent to a cell phone destination with the latitude and longitude coordinates returned by Location[] (the SMS is sent in the way explained in [here][8]. The most important piece of code in this part is: DeviceWrite[serial, "AT+CMGL=\"REC UNREAD\"\r"]; Pause[5]; message=FromCharacterCode@DeviceReadBuffer[serial]; In the first line we query the module about the unread SMS messages (in this case this is the SMS which just arrived) and we obtain the SMS from the serial port buffer using DeviceReadBuffer as usual. Since we are working with a script we need to make sure that the module had enough time to give the answer to our command and for that we use Pause. The answer of the module is turned into a list of strings which looks like {{AT+CMGL="REC UNREAD"}, {}, {+CMGL:, 18,"REC UNREAD","sms_sender","","15/05/22,13:58:10+04"}, {position}, {}, {OK}} The SMS text is at the third position starting from the end of the list. ## Running the program ## The program can be run by typing in the shell prompt # wolfram -script GeoLocator.m where "GeoLocator.m" is the name of the file the Wolfram Language code was saved in. If you let the script run and send a SMS to the geolocator with the text "position" (without quotes) then after some time you should see in the shell terminal the text {{AT+CMGL="REC UNREAD"}, {}, {+CMGL:, 18,"REC UNREAD","sms_sender","","15/05/22,13:58:10+04"}, {position}, {}, {OK}} {position} this confirms that the SMS was received. After a moment you should receive in your destination cell phone the SMS with the geographic coordinates of the geolocator. If you get the SMS text "(0.,0.)" then it means that the GPS did not get a satellite fix yet and it just sent the default location (if the GPS is outdoors it shouldn't take too much time to get a satellite fix). Finally in a practical geolocation application you might want to run the script as a background process # wolfram -script GeoLocator.m & In this way you can log out from your R-Pi and let the script continue running. [1]: http://community.wolfram.com/groups/-/m/t/497883?p_p_auth=gyDi0lFH [2]: /c/portal/getImageAttachment?filename=431171Ou2idrKL._SL1001_.jpg&userId=11733 [3]: http://www.cooking-hacks.com/documentation/tutorials/geolocation-tracker-gprs-gps-geoposition-sim908-arduino-raspberry-pi [4]: http://community.wolfram.com/groups/-/m/t/497883?p_p_auth=gyDi0lFH [5]: http://en.wikipedia.org/wiki/Hayes_command_set [6]: http://community.wolfram.com/groups/-/m/t/497883?p_p_auth=gyDi0lFH [7]: http://community.wolfram.com/groups/-/m/t/497883?p_p_auth=gyDi0lFH [8]: http://community.wolfram.com/groups/-/m/t/497883?p_p_auth=gyDi0lFH Alfonso Garcia-Parrado 2015-05-24T21:31:21Z https://community.wolfram.com/groups/-/m/t/3169401 I just installed Mathematica on a Raspberry Pi and I am playing around and I run into this. If I do the graph up to 34, I see discrete steps. Over 35, I start to see a mix of discrete steps and continuous line. This case below, with the graph going from 1 to 50 is a good example. Why is the line changing from steps to continuous, back to steps and back to continuous? changes the 50 to 34 and it looks only steps. ![Graph][1] [1]: https://community.wolfram.com//c/portal/getImageAttachment?filename=Screenshot2024-05-02at10.38.03%E2%80%AFPM.png&userId=3169286 Viorel Negoita 2024-05-03T02:44:06Z https://community.wolfram.com/groups/-/m/t/3155725 Great having Mathematica 14 now also available for the Raspberry Pi, thank you very much! The only problem is that when starting an upgraded install (from 13.3.1). it stops with a series of errors, the first shown in the screenshot (I'm not using walynd but the old X/VNC combo). ![Mathematica 14 startup error][1] Thanks for your help, Michael [1]: https://community.wolfram.com//c/portal/getImageAttachment?filename=Mathematica14_error.jpg&userId=1664744 Michael Byczkowski 2024-04-09T18:24:27Z https://community.wolfram.com/groups/-/m/t/3140560 &[Wolfram Notebook][1] [1]: https://www.wolframcloud.com/obj/f8c1cc1b-f366-4bb5-bda3-dd5bfb4c07c6 Brad Klee 2024-03-14T01:07:00Z https://community.wolfram.com/groups/-/m/t/3103515 This is a guide for installing Mathematica ARM Version (Raspberry Pi) on Android devices with a full GUI. The guide assumes that one has Termux-x11 and proot-distro working in order to have a GUI. You are required to have a Mathematica key for Linux to activate. [Termux][1] and [Termux-x11][2] are a terminal and x11-forwarding implementation for Android devices. There is no root requirement, thus the security of your device will not be compromised. Please refer to these guides in order to install and get them working. [Proot-distro][3] is a quick way to get a linux distro to work on Android devices. It is not a virtual machine because all installed distros are the ARM64 version to work with most phones/tablets' processors. Rather, proot-distro is a container environment manager, handling/hijacking system IO and storage to emulate chroot and mount for non-rooted devices, thus if your device is rooted, you do not need to install proot-distro. Because it is not a virtual machine, you have almost full processing speed except for the IO hijacking, giving a minor hit to the performance. However, as long as the calculation in Mathematica does not involve a lot of IOs, performance is very decent. Please follow the guide and install the debian (for rooted device, install debian using whatever you want). Here, we need debian because the ARM version of Mathematica is built for Raspbian originally, which is debian-based, thus using debian via proot-distro helps to handle some system dependents that native Termux does not have. It is my goal in the future to have Mathematica working natively on Termux to get native performance. Inputs/helps are needed and welcome! **How to Install Wolfram Kernel (back end):** - Start proot-distro debian by proot-distro login debian - Allow a multi-architecture (64+32-bit) and install 32-bit libraries because Mathematica uses some of these (the latter is optional, but it might help in case you see some error related to 32-bit instruction) dpkg --add-architecture armhf apt install libatomic1:armhf libgl1:armhf - Download the [Raspberry Pi installation script][4] from Wolfram and put it in the root folder of debian. You should have access to your usual Android "Download" folder through cd //sdcard/Download/ - Execute the official installation script (Current version is 13.3.1, but this might change when they release new version) bash ./install-wolfram-engine-13.3.1.sh - At this point, everything should be set. You can activate Mathematica by starting its Kernel and follow the instruction (I activate sucessfully using a Linux Mathematica Key provided by my institution) wolfram - After activation, you should have been forwarded to the Wolfram CLI Kernel, where we have full access to the Kernel (back end). To quit, execute Quit[] **How to run Mathematica GUI (front end):** - Start the Termux-x11 app on your Android device and a termux terminal. Then, start an x11 instance by executing in Termux terminal termux-x11 :1 & If Termux and Termux-x11 have been installed correctly, you should see the x11 app window black and the mouse cursor is an x. - Start debian with x-11 forwarding proot-distro login debian --shared-tmp - Set display to the previously started (1 in this case) export DISPLAY=:1 - Optional step: Install xfce4 desktop environment to have full multi-window desktop experience (otherwise you cannot control fullscreen window in x11 window) apt install xfce4 To start the desktop environment (you should see the x11 app with full desktop interface now) xfce4-session & - Start Mathematica from command line mathematica & and you should see the Raspberry Pi Mathematica window pop-up! Tested device: Samsung Tab S9 with Snapdragon 8 gen 2 runnning Android 14 + One UI 6. [1]: https://github.com/termux/termux-app [2]: https://github.com/termux/termux-x11 [3]: https://github.com/termux/proot-distro [4]: https://www.wolfram.com/raspberry-pi/ Quan Le Thien 2024-01-15T18:07:20Z