6
$\begingroup$

I have written a small program to take in the genotypes of the three color genes expressed in a mating pair of labradors, and output the percentage chance of getting each color in the puppies produced from the pair. It works just like I expect it to within the notebook, but I am having trouble using CloudDeploy.

Here's how it looks in the notebook, and how I want it to work:

How it works in the notebook

I've tried in both Firefox and Chrome, and I get different problems. When I try in Firefox, it works briefly, then I get this:

Broken in Firefox

And in Chrome, it almost never loads fully, but even when it does, I get this. It functions in that it recalculates the percentages, but for some reason the images don't work.

enter image description here

One other difference between Firefox and Chrome is I am signed in to Mathematica on Firefox, but not in Chrome. I have made both the images I uploaded and the CloudDeploy have Permissions->"Public", so they should be showing up either way. If I log out in Firefox, I get the same result I am currently getting in Chrome. (I've also tried it in Edge, which never loads at all.)

Here's a piece of the sample code where I'm loading one of the images:

chocolateImage = CloudImport[CloudObject[
"https://www.wolframcloud.com/objects/9a76a22a-fe9c-4e4c-872e-ca6a82ee0375"]];

I can bring up all the images using the link (like the one above), but something odd I noticed is when I copy and paste, it adds an extra forward slash in near the end of the URL:

https://www.wolframcloud.com/objects/9a76a22a-fe9c-4e4c-872e-ca6a82ee0375

I have tried changing the permissions to Permissions->{All->{"Read","Interact"}} like I saw in one suggestion, but it didn't change anything for me. I have also tried exporting to HTML, but all I seem to end up with is a blank page. Suggestions? Further questions I need to answer to get appropriate help?

Improve this question
$\endgroup$
6
  • 2
    $\begingroup$ It may be more cloud credits efficient and faster to embedd images inside your cloud object using With or SaveDefinitions. $\endgroup$ – Kuba♦ Dec 12 '17 at 7:46
  • $\begingroup$ @Kuba With solved the problem with the images, however the Manipulate doesn't function. It will do the initial calculation based on the default selections, but it won't let you select other options or recalculate. Here is what it looks like now. $\endgroup$ – crlast86 Dec 13 '17 at 3:12
  • $\begingroup$ I also tried CloudExport[Out[14], "NB", Permissions -> "Public"], and it seemed like it was going to run, then timed out. $\endgroup$ – crlast86 Dec 13 '17 at 3:41
  • 1
    $\begingroup$ It may be that it is still to big to handle. What if you embed small images, or use resized collage: ImageCollage[..., Automatic, 300]? $\endgroup$ – Kuba♦ Dec 13 '17 at 14:27
  • $\begingroup$ @Kuba Tried that, it fully loads the page, and evaluates the initial calculation, but then it seems to lock up and won't evaluate any further. link $\endgroup$ – crlast86 Dec 18 '17 at 18:37
5
$\begingroup$ 
expr = Import[
  CloudObject@"https://www.wolframcloud.com/objects/419dab25-ca42-4b41-8b1f-e7e372c78da9"
, "NB"
][[1, 1, 1, 1]] // ToExpression // Delete[#, -2] &;

You could try to play with MVue: https://github.com/kubaPod/MVue

It does not support ControlsPlacement or custom Grids for control specification yet and SetterBar is replaced with PopupMenu at the moment, but at least it works and you know if calculation is ongoing:

Needs @ "MVue`"
CloudDeploy[MVue[expr], Permissions -> "Public"]

enter image description here

Improve this answer
$\endgroup$
2
  • $\begingroup$ A dropdown menu would be fine, honestly. I'll play around with this and see if I can get it working. Thanks! $\endgroup$ – crlast86 Jun 6 '18 at 14:52
  • $\begingroup$ @crlast86 you just need to change labels and yes, should be fine. Let me know how it went for you. And feel free to ask/request features here or in github. $\endgroup$ – Kuba♦ Jun 6 '18 at 15:50
1
$\begingroup$

To fix the manipulate issue try changing the permissions to: 

Permissions -> {All -> {"Read", "Interact"}}

For testing how the public will see it, try opening it in an "incognito" window.

Improve this answer
$\endgroup$

Your Answer

By clicking “Post Your Answer”, you agree to our terms of service, privacy policy and cookie policy

Not the answer you're looking for? Browse other questions tagged or ask your own question.