19 November 2015

Alan Finkel: Australia's new Chief Scientist


Alan Finkel to be Australia's new Chief Scientist


Tim Dean, The Conversation

Engineer, entrepreneur and philanthropist, Dr Alan Finkel, is expected to be declared Australia’s new Chief Scientist.

He will take over the role once the sitting Chief Scientist, Professor Ian Chubb, finishes his five-year stint in the job on December 31 this year.

Finkel was most recently Chancellor of Monash University, a post he has held since 2008. He is also the President of the Australian Academy of Technological Sciences and Engineering (ATSE).

Finkel is an outspoken advocate for science awareness and popularisation. He is a patron of the Australian Science Media Centre and has helped launch popular science magazine, Cosmos.

He is also an advocate for nuclear power, arguing that “nuclear electricity should be considered as a zero-emissions contributor to the energy mix” in Australia.

The Australian Academy of Science (AAS) President, Professor Andrew Holmes, has welcomed the expected appointment of Alan Finkel to the Chief Scientist’s role.

“The Academy is looking forward to the government’s announcement, but Professor Finkel would be an excellent choice for this position. I’m confident he would speak strongly and passionately on behalf of Australian science, particularly in his advice to government,” he said.

“The AAS and ATSE have never been closer; we have worked together well on important issues facing Australia’s research community, including our recent partnership on the Science in Australia Gender Equity initiative.”

Professor Holmes also thanked outgoing Chief Scientist, Professor Ian Chubb, for his strong leadership for science in Australia, including establishing ACOLA as a trusted source of expert, interdisciplinary advice to the Commonwealth Science Council.

“Since his appointment, Professor Chubb has been a tireless advocate of the fundamental importance of science, technology engineering and mathematics (STEM) skills as the key to the country’s future prosperity, and a driving force behind the identification of strategic research priorities for the nation,” Holmes said.



This story was edited at 4:25pm AEDT to reflect that the government has yet to make an official announcement of the appointment of the new Chief Scientist.

The Conversation

Tim Dean, Editor, The Conversation

This article was originally published on The Conversation. Read the original article.

12 November 2015

Adaptive mark in PGFplots

It often happens that we want to draw some graphs with few traces that have sharp resonances/sharp peaks, etc. As illustrated in the below figure, flat parts of the curve get a lot of markers, while sharp parts get only few markers, if any. An illustration of the problem is in the figure below:

Too many markers in the slow area, and only few markers in the sharp area
 Matlab users often have this problem (I had this issue very often when I used it to draw graphics). This issue can be avoided in graphs drawn by pdfLaTeX and PGFplots by the following trick.

\makeatletter
\tikzset{
 nomorepostactions/.code={\let\tikz@postactions=\pgfutil@empty},
 mymark/.style 2 args={decoration={markings,
   mark= between positions 0 and 1 step (1/20)*\pgfdecoratedpathlength with{%
    \tikzset{#2,every mark}\tikz@options
    \pgfuseplotmark{#1}%
   },
  },
  postaction={decorate},
  /pgfplots/legend image post style={
   mark=#1,#2,every path/.append style={nomorepostactions}
  },
 },
}
\makeatother

Here,  we define a custom TIKZ style, and specify the maximum distance between adjacent points.
Sharp traces with equally spaced markers
This post is based on this answer from StackExchange.com. For additional info about this please see here.
A complete working example is as follows:


1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
\documentclass[]{standalone}
\usepackage{pgfplots}
\pgfplotsset{compat=newest}
\usetikzlibrary{decorations.markings}
\makeatletter
\tikzset{
 nomorepostactions/.code={\let\tikz@postactions=\pgfutil@empty},
 mymark/.style 2 args={decoration={markings,
   mark= between positions 0 and 1 step (1/20)*\pgfdecoratedpathlength with{%
    \tikzset{#2,every mark}\tikz@options
    \pgfuseplotmark{#1}%
   },
  },
  postaction={decorate},
  /pgfplots/legend image post style={
   mark=#1,#2,every path/.append style={nomorepostactions}
  },
 },
}
\makeatother

\begin{document}
 \begin{tikzpicture}
 \begin{axis}[axis x line=middle, axis y line=left, xmax=2.5, xlabel=$x$, ylabel=$y$, ymin=-0.15]
 
 \addplot[blue, domain=0:3,samples=150,mymark={*}{dotted}]
 {exp(-400*(x-1)^2)};
 
 \addplot[red, domain=0:3,samples=150,mymark={*}{dotted}]
 {exp(-400*(x-1.5)^2)};
 \end{axis}
 \end{tikzpicture}
\end{document}