Ygtjki

Windows 10: How to Lock (not sleep) laptop on lid close?

Is an up-to-date browser secure on an out-of-date OS?

should truth entail possible truth

What is the role of 'For' here?

Would an alien lifeform be able to achieve space travel if lacking in vision?

Single author papers against my advisor's will?

What can I do if neighbor is blocking my solar panels intentionally?

Is this wall load bearing? Blueprints and photos attached

Can withdrawing asylum be illegal?

How do I design a circuit to convert a 100 mV and 50 Hz sine wave to a square wave?

Sub-subscripts in strings cause different spacings than subscripts

Could an empire control the whole planet with today's comunication methods?

Am I ethically obligated to go into work on an off day if the reason is sudden?

Simulating Exploding Dice

University's motivation for having tenure-track positions

How to read αἱμύλιος or when to aspirate

Working through the single responsibility principle (SRP) in Python when calls are expensive

The following signatures were invalid: EXPKEYSIG 1397BC53640DB551

What is the padding with red substance inside of steak packaging?

Was credit for the black hole image misappropriated?

How did the audience guess the pentatonic scale in Bobby McFerrin's presentation?

What happens to a Warlock's expended Spell Slots when they gain a Level?

Can each chord in a progression create its own key?

Is there a way to generate uniformly distributed points on a sphere from a fixed amount of random real numbers per point?

Replacing a column in a table with values dependent on the current values in the column?

2

$begingroup$

I currently have a table of absorbances vs. wavenumbers. How would I change that to a table of %transmittances vs. wavenumbers? The relationship is given by

%Transmittance = (10^(-absorbance))*100] 

I've tried:

newtable = Replace[currenttable, i -> ((10^(-i))*100)] 

No errors occur, but nothing happens.

list-manipulation

share|improve this question

edited Apr 9 at 5:47

m_goldberg

88.6k873200

asked Apr 9 at 5:20

Christof Israel FontanillaChristof Israel Fontanilla

111

New contributor

Christof Israel Fontanilla is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.

$endgroup$

• 
  
  
  

  
  2
  

  
  
  
  
  
  

  
  $begingroup$
  You may use newtable = currenttable; newtable[[All, i]] = (10^(-newtable[[All, i]]))*100; where i is the number of the column. If you wonder what [[ ]] is, look up Part in the documentation.
  $endgroup$
  – Henrik Schumacher
  Apr 9 at 5:53
  

  
  
  
  


• 
  
  
  

  
  2
  

  
  
  
  
  
  

  
  $begingroup$
  Is the table structured as a list of pairs in form wave-number, absorbance?
  $endgroup$
  – m_goldberg
  Apr 9 at 5:54
  

  
  
  
  


• 
  
  
  

  
  3
  

  
  
  
  
  
  

  
  $begingroup$
  If you could show a brief excerpt of your table in your question, it would be easier to help you more effectively.
  $endgroup$
  – MarcoB
  Apr 9 at 5:59
  

  
  
  
  

add a comment | 

2

$begingroup$

I currently have a table of absorbances vs. wavenumbers. How would I change that to a table of %transmittances vs. wavenumbers? The relationship is given by

%Transmittance = (10^(-absorbance))*100] 

I've tried:

newtable = Replace[currenttable, i -> ((10^(-i))*100)] 

No errors occur, but nothing happens.

list-manipulation

share|improve this question

edited Apr 9 at 5:47

m_goldberg

88.6k873200

asked Apr 9 at 5:20

Christof Israel FontanillaChristof Israel Fontanilla

111

New contributor

Christof Israel Fontanilla is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.

$endgroup$

• 
  
  
  

  
  2
  

  
  
  
  
  
  

  
  $begingroup$
  You may use newtable = currenttable; newtable[[All, i]] = (10^(-newtable[[All, i]]))*100; where i is the number of the column. If you wonder what [[ ]] is, look up Part in the documentation.
  $endgroup$
  – Henrik Schumacher
  Apr 9 at 5:53
  

  
  
  
  


• 
  
  
  

  
  2
  

  
  
  
  
  
  

  
  $begingroup$
  Is the table structured as a list of pairs in form wave-number, absorbance?
  $endgroup$
  – m_goldberg
  Apr 9 at 5:54
  

  
  
  
  


• 
  
  
  

  
  3
  

  
  
  
  
  
  

  
  $begingroup$
  If you could show a brief excerpt of your table in your question, it would be easier to help you more effectively.
  $endgroup$
  – MarcoB
  Apr 9 at 5:59
  

  
  
  
  

add a comment | 

$begingroup$

I currently have a table of absorbances vs. wavenumbers. How would I change that to a table of %transmittances vs. wavenumbers? The relationship is given by

%Transmittance = (10^(-absorbance))*100] 

I've tried:

newtable = Replace[currenttable, i -> ((10^(-i))*100)] 

No errors occur, but nothing happens.

list-manipulation

share|improve this question

edited Apr 9 at 5:47

m_goldberg

88.6k873200

asked Apr 9 at 5:20

Christof Israel FontanillaChristof Israel Fontanilla

111

New contributor

Christof Israel Fontanilla is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.

$endgroup$

%Transmittance = (10^(-absorbance))*100] 

newtable = Replace[currenttable, i -> ((10^(-i))*100)] 

share|improve this question

edited Apr 9 at 5:47

m_goldberg

88.6k873200

asked Apr 9 at 5:20

Christof Israel FontanillaChristof Israel Fontanilla

111

New contributor

Christof Israel Fontanilla is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.

share|improve this question

edited Apr 9 at 5:47

m_goldberg

88.6k873200

asked Apr 9 at 5:20

Christof Israel FontanillaChristof Israel Fontanilla

111

New contributor

Christof Israel Fontanilla is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.

edited Apr 9 at 5:47

m_goldberg

88.6k873200

edited Apr 9 at 5:47

m_goldberg

88.6k873200

asked Apr 9 at 5:20

Christof Israel FontanillaChristof Israel Fontanilla

111

New contributor

Christof Israel Fontanilla is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.

asked Apr 9 at 5:20

Christof Israel FontanillaChristof Israel Fontanilla

111

1 Answer
1

active

oldest

votes

4

$begingroup$

Contrived data based on the element form wave-number, absorbance.

SeedRandom[42]; 
With[n = 5, data = Sort @ Transpose[RandomInteger[100, n], RandomReal[1., n]]]

4, 0.142803, 6, 0.628702, 15, 0.290081, 54, 0.0292846, 66, 0.105067

Assuming you want to keep the original data and not destructively change the 2nd column in it, you could proceed as follows:

newdata = data;
newdata[[All, 2]] = 100 10^-data[[All, 2]];
newdata

4, 71.9776, 6, 23.5124, 15, 51.2765, 54, 93.4793, 66, 78.5114

This works because all Mathematica's arithmetic operators have a property called Listable, which means they automatically map over lists such as data[[All, 2]]. In this case the operator doing the mapping is Power.

share|improve this answer

edited Apr 9 at 6:21

answered Apr 9 at 6:14

m_goldbergm_goldberg

88.6k873200

$endgroup$

add a comment | 

Your Answer

StackExchange.ready(function()
var channelOptions =
tags: "".split(" "),
id: "387"
;
initTagRenderer("".split(" "), "".split(" "), channelOptions);

StackExchange.using("externalEditor", function()
// Have to fire editor after snippets, if snippets enabled
if (StackExchange.settings.snippets.snippetsEnabled)
StackExchange.using("snippets", function()
createEditor();
);

else
createEditor();

);

function createEditor()
StackExchange.prepareEditor(
heartbeatType: 'answer',
autoActivateHeartbeat: false,
convertImagesToLinks: false,
noModals: true,
showLowRepImageUploadWarning: true,
reputationToPostImages: null,
bindNavPrevention: true,
postfix: "",
imageUploader:
brandingHtml: "Powered by u003ca class="icon-imgur-white" href="https://imgur.com/"u003eu003c/au003e",
contentPolicyHtml: "User contributions licensed under u003ca href="https://creativecommons.org/licenses/by-sa/3.0/"u003ecc by-sa 3.0 with attribution requiredu003c/au003e u003ca href="https://stackoverflow.com/legal/content-policy"u003e(content policy)u003c/au003e",
allowUrls: true
,
onDemand: true,
discardSelector: ".discard-answer"
,immediatelyShowMarkdownHelp:true
);



);

Christof Israel Fontanilla is a new contributor. Be nice, and check out our Code of Conduct.

draft saved

draft discarded

Sign up or log in

StackExchange.ready(function ()
StackExchange.helpers.onClickDraftSave('#login-link');
);

Sign up using Google

Sign up using Facebook

Sign up using Email and Password

Post as a guest

Name

Email

Required, but never shown

StackExchange.ready(
function ()
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fmathematica.stackexchange.com%2fquestions%2f194857%2freplacing-a-column-in-a-table-with-values-dependent-on-the-current-values-in-the%23new-answer', 'question_page');

);

Post as a guest

Name

Email

Required, but never shown

4

$begingroup$

Contrived data based on the element form wave-number, absorbance.

SeedRandom[42]; 
With[n = 5, data = Sort @ Transpose[RandomInteger[100, n], RandomReal[1., n]]]

4, 0.142803, 6, 0.628702, 15, 0.290081, 54, 0.0292846, 66, 0.105067

Assuming you want to keep the original data and not destructively change the 2nd column in it, you could proceed as follows:

newdata = data;
newdata[[All, 2]] = 100 10^-data[[All, 2]];
newdata

4, 71.9776, 6, 23.5124, 15, 51.2765, 54, 93.4793, 66, 78.5114

This works because all Mathematica's arithmetic operators have a property called Listable, which means they automatically map over lists such as data[[All, 2]]. In this case the operator doing the mapping is Power.

share|improve this answer

edited Apr 9 at 6:21

answered Apr 9 at 6:14

m_goldbergm_goldberg

88.6k873200

$endgroup$

add a comment | 

4

$begingroup$

Contrived data based on the element form wave-number, absorbance.

SeedRandom[42]; 
With[n = 5, data = Sort @ Transpose[RandomInteger[100, n], RandomReal[1., n]]]

4, 0.142803, 6, 0.628702, 15, 0.290081, 54, 0.0292846, 66, 0.105067

Assuming you want to keep the original data and not destructively change the 2nd column in it, you could proceed as follows:

newdata = data;
newdata[[All, 2]] = 100 10^-data[[All, 2]];
newdata

4, 71.9776, 6, 23.5124, 15, 51.2765, 54, 93.4793, 66, 78.5114

This works because all Mathematica's arithmetic operators have a property called Listable, which means they automatically map over lists such as data[[All, 2]]. In this case the operator doing the mapping is Power.

share|improve this answer

edited Apr 9 at 6:21

answered Apr 9 at 6:14

m_goldbergm_goldberg

88.6k873200

$endgroup$

add a comment | 

$begingroup$

Contrived data based on the element form wave-number, absorbance.

SeedRandom[42]; 
With[n = 5, data = Sort @ Transpose[RandomInteger[100, n], RandomReal[1., n]]]

4, 0.142803, 6, 0.628702, 15, 0.290081, 54, 0.0292846, 66, 0.105067

Assuming you want to keep the original data and not destructively change the 2nd column in it, you could proceed as follows:

newdata = data;
newdata[[All, 2]] = 100 10^-data[[All, 2]];
newdata

4, 71.9776, 6, 23.5124, 15, 51.2765, 54, 93.4793, 66, 78.5114

This works because all Mathematica's arithmetic operators have a property called Listable, which means they automatically map over lists such as data[[All, 2]]. In this case the operator doing the mapping is Power.

share|improve this answer

edited Apr 9 at 6:21

answered Apr 9 at 6:14

m_goldbergm_goldberg

88.6k873200

$endgroup$

SeedRandom[42]; 
With[n = 5, data = Sort @ Transpose[RandomInteger[100, n], RandomReal[1., n]]]

newdata = data;
newdata[[All, 2]] = 100 10^-data[[All, 2]];
newdata

share|improve this answer

edited Apr 9 at 6:21

answered Apr 9 at 6:14

m_goldbergm_goldberg

88.6k873200

answered Apr 9 at 6:14

m_goldbergm_goldberg

88.6k873200

answered Apr 9 at 6:14

m_goldbergm_goldberg

88.6k873200